macro pour faire sauter un code dans un classeur

  • Initiateur de la discussion Diop
  • Date de début
D

Diop

Guest
Bonjour à tous,

j'ai lu sur le forum hier qu'il etait possible de deproteger un classeur avec une macro sans connaitre son code

Est ce que c'est possible avec cette macro :

Sub
UnprotectVBProject(WB As Workbook, ByVal Password As String)
Dim vbProj As Object

Set vbProj = WB.VBProject

'Teste si le classeur est déjà déprotégé
If vbProj.Protection <> 1 Then Exit Sub
Set
Application.VBE.ActiveVBProject = vbProj

'uilise les sendkeys pourmasquer le mot de passe du projet
SendKeys Password & "~~"

Application.VBE.CommandBars(1).FindControl(ID:=2578, recursive:=True).Execute

End Sub



si oui comment ? (en macro evenementielle ou quoi)

merci de votre aide
 

Statistiques des forums

Discussions
292 942
Messages
1 927 371
Membres
183 526
dernier inscrit
Catherinee