enregistrer une feuille sur un chemin

[benmx]

bonjour
je souhaite enregistrer une feuille vers un autre classeur selon un chemin précis (plusieur fichier....)
je connais la macro:

ActiveSheet.Copy
ActiveWorkbook.SaveAs 'C:\\NouveauClasseur.xls'
ActiveWorkbook.Close

Le problème c'est qu'elle me met mon fichier dans c alors que je le voudrai autre part dans un autre fichier!?

merci
@plus

 

[Yan L]

Bonjour,

Je ne comprends pas vraiment ta question...
Tu veux pouvoir modifier le chemin d'enregistrement à la volée?
Dans ce cas,

Dim chemin as string
chemin = Application.GetSaveAsFilename
If (chemin <> 'Faux') Then 'Faux est retourné si l'utilisateur annule
ActiveSheet.Copy
ActiveWorkbook.SaveAs chemin
ActiveWorkbook.Close
End If

Ainsi, à l'exécution, la macro ouvrira une boîte de choix qui te permettra de modifier ton chemin selon tes besoin.
Bonne continuation!

Yan

 

[benmx]

merci beaucoup

c'est ce que je voulais!

@plus