Discussion :

[florianne]

Bonsoir je rencontre un problème que je n'arrive pas à résoudre...

J'ai un fichier en .xlsm dont je me sers afin de copier et sauvegarder la feuil1 de ce fichier.

J'utilise

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Feuil1.Copy

puis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveWorkbook.SaveCopyAs Filename:=sNom

Cependant quand je mets des évenements sur cette feuille 1
(par exemple CommandButton1_Click()), ils ne sont pas copier avec la feuille1 et donc non sauvegardé.

Connaissez vous la réponse ? Merci.

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveWorkbook.SaveAs Filename:=sNom, FileFormat:=xlOpenXMLWorkbookMacroEnabled

[florianne]

Le code me sauvegarde la totalité du document alors qu'il ne me faudrait que la feuille 1 avec les événements. Du coup , il y a les feuilles 2 et 3 ainsi que les modules qui alourdissent le fichier.

[mercatog]

J'ai changé seulement ta 2ème ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Feuil1.Copy
ActiveWorkbook.SaveAs Filename:=sNom, FileFormat:=xlOpenXMLWorkbookMacroEnabled

[florianne]

Un grand merci effectivement ça marche