Supprimer mot de passe macro par macro
g
Bonjour,
Je souhaite à partir d'une macro en connaissant son propre mot de passe de protection des macros, pouvoir comme pour les classeurs la supprimer par macro
ActiveWorkbook.UnprotectVBProject Password:="MDP"
ActiveWorkbook.VBProject.VBComponents.Remove ActiveWorkbook.VBProject.VBComponents("module1")mais ce code ne fonctionne pas
Merci par avance,
Cordialement.
g
Ce n'est pas possible ?
Il y a un mot de passe sur le code.
Je souhaite supprimer un module à partir d'une macro du même programme.
Soit en forçant la suppression du module malgré le mot de passe.
Soit en désactivant le mot de passe qui est connus.
Bonjour
pour deverouiller un projet VBA tu peux utiliser le code suivant :
que j'ai testé sur eXcel 2007 et 2013 64bits
il faut que l'option d'excel
"Accès approuvé au modèle d'objet du projet VBA" soit cochée sinon cela ne marchera pas....
Sub UnprotectVBProject(WB As Workbook, ByVal Password As String)
Dim vbProj As Object
Set vbProj = WB.VBProject
If vbProj.Protection <> 1 Then Exit Sub
Set Application.VBE.ActiveVBProject = vbProj
SendKeys Password & "~~~"
Application.VBE.CommandBars(1).FindControl(ID:=2578, recursive:=True).Execute
End Subfred