Supprimer Macro

MarcM

XLDnaute Nouveau
Je souhaiterais supprimer automatiquement une Macro qui s'execute à l'ouverture d'excel. Sous excel 2000 voici ce que j'avais fait.


Private Sub Workbook_Open()
Dim liDeb, NbLi
'
' Extract Macro
' execution du code'
...............................
'suppression de la macro
With ThisWorkbook.VBProject.VBComponents("ThisWorkbook").CodeModule
liDeb = .ProcStartLine("Workbook_Open", 0)
NbLi = .ProcCountLines("Workbook_Open", 0)
.DeleteLines liDeb, NbLi
End With
'
End Sub


En 2007 erreur 1004 L'acces par pgm au projet vb n'est pas fiable
 

MichelXld

XLDnaute Barbatruc
Re : Supprimer Macro

Bonsoir

En complément de la réponse de Michel,
Onglet "Développeur"
Bouton "Sécurité des macros dans le groupe "Code"
Menu "Paramètres des macros"
Coche l'option "Accès approuvé au modèle d'objet du projet VBA"
Clique sur le bouton OK pour valider


bon week end
michel
 

Discussions similaires

Statistiques des forums

Discussions
312 489
Messages
2 088 851
Membres
103 974
dernier inscrit
chmikha