Celulle Protegée

[kikouu]

Bonjour tout le monde,

Voilà je voudrais s'il y avait un moyen de savoir si l'on peut savoir à priori si une celulle est protégée ou pas avec VBA?

 

[Staple1600]

Re : Celulle Protegée

Bonjout


A tester

If ActiveCell.Locked=True then Msgbox "cellule protégée"

 

[kikouu]

Re : Celulle Protegée

Merci mais j'ai trouvé comment faire :

    For Each Rng In ActiveWindow.VisibleRange.Cells
        If Rng.Locked = False Then
            Rng.Select
            Rng.Value = ""
        End If
    Next Rng

Merci quand même!!!!