Macro "Enregistrer sous" avec chemin prédéfini

Fermé
zeldarayman Messages postés 23 Date d'inscription vendredi 6 mars 2009 Statut Membre Dernière intervention 17 janvier 2016 - 10 juil. 2013 à 12:02
 WeaponEDGE - 10 juil. 2013 à 13:30
Bonjour à tous,

Je met en place un classeur Excel pour le travail que je dois correctement automatiser.

J'ai créé plusieurs boutons, dont un qui est sensé ouvrir la fenêtre "enregistrer sous" au bon chemin.

J'ai essayé de mettre dans la macro

Application.Dialogs(xlDialogSaveAs).Show ("C:\fakepath\Dossier\Nomdufichier")

Mais ça n'a fait qu'ouvrir la fenêtre "Enregistrer sous" avec "Nomdufichier" en nom prédéfini (jusqu'ici très bien) SAUF que je suis positionné sur le Bureau, au lieu du dossier espéré...


J'aimerai donc savoir que faire pour que la fenêtre me propose directement d'enregistrer dans mon Dossier.

Merci d'avance,

François
A voir également:

1 réponse

Bonjour,

Essaye un comme ça

Sub Enreg()
Chemin = "C:\fakepath\Dossier\Nomdufichier.xls"
ActiveWorkbook.SaveAs (Chemin)
End Sub
0