|
| stricker | Posté le 05/09/2005 @ 18:19 |
Petit astucien
48 Messages
| bonjour,
comment inscrire une instruction dans une macro sous word pour que celui ci ouvre la boite de Dialogue "enregistrer sous"
merci
|
| |
| |
| Publicité |
|
|
| KiWin | Posté le 05/09/2005 à 19:57 |
Petit astucien
141 Messages
| Salut,
Sub EnregSous()
ActiveDocument.SaveAs
End Sub
La méthode SaveAs peut contenir des arguments qui par exempel permettre de définir un nom par défaut au fichier à enregsitrer, pour les connaîtres je t'invite à consulter l'aide de Visual Basic Editor (Ctrl+F11). |
| |
|
| stricker | Posté le 05/09/2005 à 20:27 |
Petit astucien
48 Messages
| merci beaucoup
mais j'ai oublié de préciser que ce n'était pas la seule instruction dans la macro, en effet je fais imprimer le document puis sauvegarder (j'avais trouvé pour la sauvegarde par defaut, mais je voulais pouvoir lui donner un nom different à chaque sauvegarde) et puis quitter word, car j'importe mes données dans un formulaire depuis ACCESS ( je débute ), le probleme est d'organiser les instruction pour qu'elle s'enchaine correctement avec les renseignement que tu viens de me donner |
| |
|
| KiWin | Posté le 05/09/2005 à 20:37 |
Petit astucien
141 Messages
| Si tu rencontre des difficultés, donne-moi le code complet je compléterais.
[hello] |
| |
|
| stricker | Posté le 06/09/2005 à 12:13 |
Petit astucien
48 Messages
| je te remercie pour ton aide, mais je crois avoir trouvé une solution convenable, dis moi ce que tu en pense :
Private Sub CommandButton1_Click()
Dialogs(wdDialogFileSaveAs).Show
ActiveDocument.PrintOut
Application.Quit
End Sub
|
| |
|
| KiWin | Posté le 06/09/2005 à 12:43 |
Petit astucien
141 Messages
| Pourquoi pas mais tu disait vouloir d'abord imprimer puis sauvegarder, ds ce cas il faut mettre ds l'ordre :
Private Sub CommandButton1_Click()
ActiveDocument.PrintOut
Dialogs(wdDialogFileSaveAs).Show
Application.Quit
End Sub
|
| |
|
| stricker | Posté le 06/09/2005 à 12:45 |
Petit astucien
48 Messages
| exact ! merci beaucoup[bigsmile] |
| |
|
| KiWin | Posté le 06/09/2005 à 12:55 |
Petit astucien
141 Messages
| Mais de rien ;) |
| |
|
|
| Haut de la page |