F
fabien114
Guest
[Résolu] verrouiller cellule en fonction de sa couleur
Bonjour,
J'ai un tableau avec excel avec plus 50 onglets. Je souhaite sur chaque feuille : dé-protéger la feuille, deverrouiller les cellules avec la couleur 34, verrouiller les autres cellules et enfin protéger la feuille.
Voici mon code :
Ca fonctionne mais dés qu'il rencontre une cellule fusionnée j'ai cette erreur : "erreur d'éxécution 1004 : erreur définie par l'application ou par l'objet".
Merci d'avance 😉
Bonjour,
J'ai un tableau avec excel avec plus 50 onglets. Je souhaite sur chaque feuille : dé-protéger la feuille, deverrouiller les cellules avec la couleur 34, verrouiller les autres cellules et enfin protéger la feuille.
Voici mon code :
Code:
Sub ProtegerOnglets()
For i = 1 To Worksheets.Count
Worksheets(i).Unprotect
For Each n In Worksheets(i).[A1:Z1000]
n.Select
If n.Interior.ColorIndex = 34 Then
n.Locked = False
Else
n.Locked = True
End If
Next
Worksheets(i).Protect
Next
End SubMerci d'avance 😉
Dernière modification par un modérateur: