pascal21
XLDnaute Barbatruc
Code:
Private Sub Worksheet_Activate()
If ActiveSheet.Protect = True Then
Label1.Caption = "feuille protegée" 'couleur label rouge
Else: Label1.Caption = "feuille non protégée" 'couleur label verte
End If
End Subje viens d'essayer ça pour avoir une indication de l'état de la protection de la feuille dans un label sur la feuille
mais ça ne fonctionne pas et ça enclenche la protection au changement de feuille
ce que j'aimerais c'est juste l'état de la protection dans le label et la couleur si possible
merci de votre aide
ou encore un bouton à la place du label ça permettrait de proteger ou déproteger si besoin