Macro Excel

[Jonathan]

Bonjour à Tous,

Je dois créer une macro qui doit copier deux onglets dans un nouveau classeur puis enregister. Le nom de mon fichier fait référence à une cellule de mon fichier original.

Merci par avance :sick:

 

[guitarde]

Cette macro sauvegarde 2 feuilles avec le nom de fichier qui est dans la cellule A1.

Sub Macro1()

'
'Définition du nom du fichier

vNomFichier = Cells(1, 1).Value

Sheets(Array('Sheet3', 'Sheet2')).Copy

ActiveWorkbook.SaveAs Filename:= _
vNomFichier, FileFormat:= _
xlNormal, Password:='', WriteResPassword:='', ReadOnlyRecommended:=False _
, CreateBackup:=False
End Sub



Salutations
Eric