@Christophe@

Bonjour Thibaut

C'est possible, j'utilise ce code moi même, si mes souvenir sont bon, c'est un truc que @Thierry a donner sur le forum

Tu dois bien tenir compte de quelque petit chose, tu dois dans ton code supprimer les macro du doc excel, ensuite sauvegardé sous, et ensuite fermé les deux document sans sauvé le doc d'origine, parce que aussi non tu enregistre avec tes macro supprimer, essaye de t'en sortir.

Voila le code qui supprime les macro de la feuille1

With ActiveWorkbook.VBProject.VBComponents(ActiveWorkbo ok.Sheets("Feuil1").CodeName).CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With


Pour supprimer tous, Code VBA, Userform, Module,... ca moi je bosse autrement, je copie la feuil dans un nouveau doc avec le code suivant:

Sheets("Feuil1").Select
Sheets("Feuil1").Copy

Ensuite je sauf mon nouveau doc sous et je ferme le tous, le nouveau doc est complétement vide de tous VBA


A toi de voir

@Christophe@