Bonsoir Philippe, Léa, Soussou, et jmps,
Je suis 'tomb"' une fois sur ceci dans ce forum; après adaptation cva pourrait peut-être convenir ? Moi je ne sais pas faire mais quelqu'un ici devrait y parvenir.
Executer une macro à usage unique et s'effacera lors du premier enregistrement de fichier.
Voila une macro que j'ai faite pour effacer les macros se trouvants dans workbook_open
Dim Debut As Integer, Lignes As Integer
On Error GoTo Suite
With ThisWorkbook.VBProject.VBComponents("ThisWorkbook").codemodule
Debut = .ProcStartLine("Workbook_Open", 0)
Lignes = .ProcCountLines("Workbook_Open", 0)
.DeleteLines Debut, Lignes
End With
Rien ne se passe Pourquoi ? C'est l'évènement Workbook_BeforeSave que tu dois indiquer