D davidm XLDnaute Nouveau 2 Septembre 2008 #1 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 : Code: Application.Dialogs(xlDialogSaveAs).Show Merci d'avance pour votre aide 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 : Code: Application.Dialogs(xlDialogSaveAs).Show Merci d'avance pour votre aide davidm
B bouley XLDnaute Nouveau 2 Septembre 2008 #2 Re : enregistrer sous bonjour, teste ceci ! Code: Application.Dialogs(xlDialogSaveAs).Show "Le nom du fichier" @+ Vote positif 0 Vote négatif
Re : enregistrer sous bonjour, teste ceci ! Code: Application.Dialogs(xlDialogSaveAs).Show "Le nom du fichier" @+
D davidm XLDnaute Nouveau 2 Septembre 2008 #3 Re : enregistrer sous Merci beaucoup ca marche parfaitement Vote positif 0 Vote négatif
A amo XLDnaute Nouveau 1 Octobre 2008 #4 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! Vote positif 0 Vote négatif
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 XLDnaute Barbatruc 1 Octobre 2008 #5 Re : enregistrer sous Bonsoir Essaie Code: Application.Dialogs(xlDialogSaveAs).Show "Nom du fichier" & Cells(4,8).Text Pour rajouter l'extension Excel Code: Application.Dialogs(xlDialogSaveAs).Show _ "Nom du fichier " & Cells(4, 8).Text & ".xls" Dernière édition: 1 Octobre 2008 Vote positif 0 Vote négatif
Re : enregistrer sous Bonsoir Essaie Code: Application.Dialogs(xlDialogSaveAs).Show "Nom du fichier" & Cells(4,8).Text Pour rajouter l'extension Excel Code: Application.Dialogs(xlDialogSaveAs).Show _ "Nom du fichier " & Cells(4, 8).Text & ".xls"
A amo XLDnaute Nouveau 1 Octobre 2008 #6 Re : enregistrer sous Merci de ta réponse aussi rapide!!! Trop fort, ca marche nikel Merci Staple1600 Vote positif 0 Vote négatif
Re : enregistrer sous Merci de ta réponse aussi rapide!!! Trop fort, ca marche nikel Merci Staple1600