enregistrer sous

[davidm]

Bonjour,

J'aimerais savoir si il est possible d'ouvrir la fenetre enregistrer sous par macro et de proposer un titre au classeur à enregistrer "exemple : classeur test "?

J'ai trouvé que le code pour ouvrir la fenetre enregistrer sous :

Application.Dialogs(xlDialogSaveAs).Show

Merci d'avance pour votre aide

davidm

 

[bouley]

Re : enregistrer sous

bonjour,

teste ceci !

Application.Dialogs(xlDialogSaveAs).Show "Le nom du fichier"

@+

 

[davidm]

Re : enregistrer sous

Merci beaucoup ca marche parfaitement

 

[amo]

Re : enregistrer sous

Bonjour,

Peut on ajouter une variable derriere le titre?

Cells(4, 8).Value = nombre12

Application.Dialogs(xlDialogSaveAs).Show "Nom du fichier" ici ajouter la valeur de nombre12

Merci d'avance de votre réponse!

 

[Staple1600]

Re : enregistrer sous

Bonsoir


Essaie

 Application.Dialogs(xlDialogSaveAs).Show "Nom du fichier"  & Cells(4,8).Text

Pour rajouter l'extension Excel

Application.Dialogs(xlDialogSaveAs).Show _
"Nom du fichier " & Cells(4, 8).Text & ".xls"

 

[amo]

Re : enregistrer sous

Merci de ta réponse aussi rapide!!!
Trop fort, ca marche nikel

Merci Staple1600