Simple problème de protection de classeur

[rcmelanie]

Bonsoir,

En voulant protéger mon classeur, une erreur se produit.

Cela est du a une macro que j'utilise de la cellule F8 à F202.

Comment puis je verrouiller ma feuille tout en gardant ma macro ?

Code pour déverrouiller : OTC3008

Voici le document :

http://cjoint.com/?jyw5rRuQ6Q

 

[ERIC S]

Re : Simple problème de protection de classeur

Bonsoir

soit dans thisworkbook_open tu protèges ta feuille àl'ouverture en autorisant les macros :

sheets(xxx).protect userinterfaceonly:= true

ou sinon tu déprotèges au début de ta macro et reprotèges à la fin

 

[CBernardT]

Re : Simple problème de protection de classeur

Bonsoir,

Peut-être avec une modification de la macro :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("F8:F202")) Is Nothing Then
With ActiveSheet
.Unprotect Password:="OTC3008"
TestFormat6Chiffres Target
.EnableSelection = xlUnlockedCells
.Protect Password:="OTC3008", Contents:=True, UserInterfaceOnly:=True, Scenarios:=True
End With
End If
End Sub

 

[rcmelanie]

Re : Simple problème de protection de classeur

C'est parfait CBernardT merci beaucoup