Copier une feuille d'un classeur vers un autre classeur

[Marion]

Bonjour,

Je fait un formulaire Access qui manipule des fichiers Excel.
Je voudrais copier une feuille d'un classeur Test1.xls vers un classeur Test2.xls.

Quand je fais
MonClasseur.sheets(I).SaveAs "C:\Test2.xls"

MonClasseur.sheets(I) Correspondant à une ou plusieurs feuille du fichier Test1.xls.
Probléme --> tout le classeur Test1.xls est copié dans Test2.xls.

Comment faire pour copier cette feuille et pas les autres ?

Merci
Marion

 

[DJN90]

Bjr,

Tu peux utiliser cette fonction à la place de Savesas

Sheets("sheet1").Copy Before:=Workbooks("test2")

@ Dan

 

[Popeye]

bonjour
essai ca

MonClasseur.Sheets("Feuil1").Copy
ActiveWorkbook.SaveAs FileName:="C:\WINDOWS\Bureau\test3.xls"
ActiveWorkbook.Close


pour le chemin tu peux mettre

ActiveWorkbook.SaveAs FileName:=application.path & "\test2.xls"

 

[Marion]

Merci j'essaye !!