sauvegarde de feuilles

[Alex]

Salut le forum


Comment faire pour savegarder une feuille(x) du classeur (classeur) dans un autre classeur(sauvegarde) ??

Merci d'avance

 

[Arnaud]

salut,

si tes 2 classeurs sont ouvert cela te donnera un truc du stye :

Sheets(x).Select
Sheets(x).Copy Before:=Workbooks(classeur).Sheets(1)

 

[Alex]

et si le classeur ou je veux sauvegarder n'est pas encore créé donc pas ouvert?

 

[Arnaud]

et bien tu le créer et tu le referme

dim fName as String
fName = "toto.xls"
Set NewBook = Workbooks.Add

NewBook.SaveAs Filename:=fName

Workbooks(fName).Close SaveChanges:=False