Erreur de chargement DLL avec Application.VBE.CommandBars(1)

Compte Supprimé 979 · 3 Février 2016

Bonjour à toutes et à tous,

Une fois n'est pas coutume je suis embêté avec la dé-protection de mes VBAProject

En effet, lorsque je lance mon code qui fonctionnait il y a peu

Code:

Sub ProtectVBProject(WB As Workbook, ByVal Password As String)
  Exit Sub
  Dim vbProj As Object
  Set vbProj = WB.VBProject
  'can't do it if already locked!
  If vbProj.Protection = 1 Then Exit Sub
  Set Application.VBE.ActiveVBProject = vbProj
  ' now use lovely SendKeys to set the project password
  SendKeys "+{TAB}{RIGHT}%V{+}{TAB}" & Password & "{TAB}" & Password & "~"
  Application.VBE.CommandBars(1).FindControl(ID:=2578, recursive:=True).Execute
  'WB.Save
End Sub

J'ai un message : Erreur de chargement de la DLL

Il faut dire aussi que j'avais installé Powerpoint 2013 un court moment puis désinstallé et je pense que le problème vient de là

comment puis-je faire pour corriger le souci ?

Par avance merci

Erreur de chargement DLL avec Application.VBE.CommandBars(1)

Compte Supprimé 979

Guest

Discussions similaires