Discussion :

[dodo69]

Bonjour,

J'aimerai pouvoir sauvegarder un fichier Excel que je viens de créer grace à une macro ...

J'ai écrit ce petit bout de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 ActiveWorkbook.SaveAs 'Chemin & Fichier

Cependant j'aimerai que l'utilisateur sauvegarde son document comme il le souhaite ...


Merci d'avance

Si je ne suis pas assez clair, n'hésitez pas à demander des précisions .

Cordialement
DoDo

[casefayere]

Bonjour,
Peut-être en insérant un inputbox juste avant le "saveas", sur lequel tu mets d'office ton chemin et qui pourra être transformé :
à main levée :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
dim fich as string
.......
.......
fich = inputbox("Quel nom dnner au fichier ?", "NOM DU FICHIER",ton_chemin_d_origine)
ActiveWorkbook.SaveAs fich

[Philippe Tulliez]

Bonjour,
Une autre option pour laisser à l'utilisateur le choix du répertoire et du nom.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Application.Dialogs(xlDialogSaveAs).Show

[dodo69]

Merci beaucoup pour ces idées
elle marche parfaitement

Cdt
Dorian