VBA - Verrouiller (figer) un menu déroulant

Bonjour à tous !

Je suis à la recherche d'un code me permettant de figer un menu déroulant.

En effet, grâce à ce forum j'ai pu réaliser une macro : 1 bouton copie sous une autre feuille le formulaire complété et efface instantanément le formulaire de base pour le remplir à nouveau.

Sub Validation()

Sheets("Formulaire").Select

Sheets("Formulaire").Copy After:=Sheets(ThisWorkbook.Sheets.Count)

If Range("B9") <> "" Then ActiveSheet.Name = Range("B9")

Worksheets("Formulaire").Range("Semaine1,Semaine2,Semaine3,Semaine4,Semaine5,Semaine6,Semaine7,Semaine8,Delta2").ClearContents

Worksheets("Formulaire").Range("B3,B7,B9,B11:B13,B15,B17,B21,B25,B29:B31,B34,B35,B37,B42,B44").ClearContents

Sheets("Formulaire").Select

End Sub

Aujourd'hui, lorsque j'active ma macro, je copie la feuille contenant des menus déroulants, mais je souhaite que la copie fige ces menus qui ne doivent plus être modifiés.

Pouvez-vous m'aider ?

Merci par avance et bonne journée

Julie

Bonjour,

Peut-être tout simplement en protégeant l'onglet recopié par un mot de passe...

Essaie :

Sheets("Formulaire").Copy After:=Sheets(ThisWorkbook.Sheets.Count)
If Range("B9") <> "" Then ActiveSheet.Name = Range("B9")
ActiveSheet.Protect "motdepasse"
....
....

Ainsi, on ne peut plus rien modifier (à moins de connaître le mot de passe...)

Bonne soirée

Super, ça marche très bien.

Je vous remercie cousinhub,

Julie