Suppression du contenu des cellules

[chimonito]

Bonjour à tous,

Pouvez vous m'aider, j'aurai voulu savoir si il y avait possibilité avec un bouton de supprimer toutes les données des cellules non protégées ou verouillée dans la plage C8:E500.

Merci de votre aide

Ben

 

[JCGL]

Re : Suppression du contenu des cellules

Bonjour à tous,

Peux-tu essayer :

Option Explicit

Sub Efface()
    ActiveSheet.Unprotect
    Range("C8:E500").ClearContents
    ActiveSheet.Protect
End Sub

A+ à tous

 

[chimonito]

Re : Suppression du contenu des cellules

Bonsoir,
Merci, en revanche cela m'efface même les cellules verrouillées en mode protection feuille.
MErci

 

[JCGL]

Re : Suppression du contenu des cellules

Bonjour à tous,

supprimer toutes les données des cellules non protégées ou verouillée dans la plage C8:E500.

C'est ce que tu demandais...

A+ à tous

 

[chimonito]

Re : Suppression du contenu des cellules

Pardon, je me suis mal exprimé, je souhaiterais supprimer les valeurs des cellules non verrouillées et ne rien faire sur les autres.
Merci