Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Comment enregistrer un fichier avec un nom variable et refaire appel à ce fichier plus tard dans la macro

Carine35

XLDnaute Nouveau
Bonjour,

Je souhaite pouvoir commencer la macro en l'enregistrant de manière automatique dans un chemin et non de dossier bien précis, mais que le choix du nom du fichier ce fasse par l'opérateur à chaque utilisation de la macro:

Voici le code que j'ai établi:
Dim Chemin As String
Dim Fichier As String

Chemin = "Y:\14-\20\ENR"
Fichier = ".xlsm"

Fichier = Application.GetSaveAsFilename(Fichier, "Fichiers Excel (*.xlsm), *.xlsm")
ActiveWorkbook.SaveAs Fichier


La boite de dialogue ne s'ouvre pas sur le chemin que j'indique.

Ensuite, dans la macro que j'ai crée je fait appel à un autre fichier et je ne sais pas comment revenir au premier fichier contenant la macro l'ayant enregistrer sous un autre nom variable?

Merci d'avance pour votre aide
 

job75

XLDnaute Barbatruc
Bonjour Carine35,

Pour que le dossier actif soit celui de Chemin ajoutez :
VB:
ChDir Chemin
Le fichier de la macro c'est ThisWorkbook, pour y revenir il faut fermer le fichier qui a été ouvert par l'instruction Workbooks.Open.

A+
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…