Protection feuille sur feuille avec VBA

Bonjour,

j'ai une feuille avec un code VBA qui me permet d'avoir un menu déroulant qui masque des colonnes selon les mois,

étant donné que je ne suis pas seul à travailler dessus, on me casse souvent les formules qui s'y trouvent

c'est pour cela que je voudrai protéger la feuille en laissant les cellules déverrouillés quand on peut modifié.

Jusqu’à la tout va bien sauf que quand je verrouille la feuille mon menu déroulant ne fonctionne plus

ma question est donc la suivante : est t'il possible de ne PAS bloquer le menu déroulant par VBA ?

je joins le fichier

Merci pour votre aide

Bonjour,

il faut insérer deux lignes dans ton code :

au début du code :

Sheets("CR_Activité").Unprotect

et a la fin du code :

Sheets("CR_Activité").Protect

Bonjour jnov68, (melch)

ou éventuellement sur la procédure évènementielle

Worksheet_Activate()

Sheets("CR_Activité").Protect UserInterfaceOnly := True

ou mieux directement à l'activation de la feuille dans le module ThisWorknook

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    If Sh.Name = "CR_Activité" Then
        Sh.Protect userinterfaceonly:=True
    End If
End Sub