VBA : Verouillage-deverouillage

Question

Bonjour, 
Comment faire pour avoir ma feuille verrouiller lorsque CheckBox1 est true et qu'elle soit déverrouillée lorsque CheckBox1 est false?

j'ai fait :
If Sheets("feuil1").CheckBox1 = true Then
     sheets("feuil1").protect
else
     sheets("feuil1").unprotect
end if

Sa ne marche pas car une fois que j'ai coché le checkbox1 la feuille se verrouille et quand je décoche la feuille reste verrouiller...

Merci bien.

Configuration: Windows 7 / Chrome 22.0.1106.241

scinarf · Answer

pour une checkbox situee sur une userfom c est : 
if userform1.checkbox1.value = true then
sheets("feuil1").protect "mot de passe" true,true,true
else
sheets("feuil1").unprotect "mot de passe" 
end if

il faut mettre le code dans

Private Sub CheckBox1_Change()

End Sub 

voila

VBA : Verouillage-deverouillage

1 réponse

Votre réponse

Discussions similaires

Newsletters