Re,
Tu as besoin du module PWManager. Dans ton fichier.
Et du dois avoir ce bout de code en début de tes procédures :
'<-- PROTECTION DE LA MACRO -->
Dim LocalPW As String
LocalPW = PWManager.InitPassword
Dim LocalString As String
LocalString = Application.InputBox("Entrez le mot de passe", "Un mot de passe est requis !", "*****")
If LocalPW <> LocalString Then
MsgBox "Perdu !"
Exit Sub
End If
'<-- FIN DE LA PROTECTION 66>
Donc tu ouvre les deux fichiers le tiens et le mien et tu fais un Drag And Drop sur ton fichier du module PWManager
Ensuite tu vérifie tes procédures...