Méthode Application.Quit (Word)
Quitte Microsoft Word et, facultativement, enregistre ou distribue les documents ouverts.
Syntaxe
expression. Quitter (SaveChanges, OriginalFormat, RouteDocument)
expression Obligatoire. Variable qui représente un objet Application.
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| SaveChanges | Facultatif | Variante | Indique si Word enregistre les documents modifiés avant de se fermer. Il peut s’agir d’une des constantes WdSaveOptions. |
| OriginalFormat | Facultatif | Variante | Indique la façon dont Word doit enregistrer les documents dont le format d'origine est différent de celui des documents Word. Il peut s’agir d’une des constantes WdOriginalFormat. |
| RouteDocument | Facultatif | Variant | True: pour distribuer le document au destinataire suivant. Si aucun bordereau de routage n’est joint au document, cet argument est ignoré. |
Exemple
Cet exemple montre comment fermer Word et inviter l'utilisateur à enregistrer tous les documents modifiés depuis le dernier enregistrement.
Application.Quit SaveChanges:=wdPromptToSaveChanges
Cet exemple montre comment inviter l'utilisateur à enregistrer tous les documents. Si l'utilisateur clique sur le bouton Yes, tous les documents sont enregistrés au format Word avant la fermeture de Word.
Dim intResponse As Integer
intResponse = _
MsgBox("Do you want to save all documents?", vbYesNo)
If intResponse = vbYes Then Application.Quit _
SaveChanges:=wdSaveChanges, OriginalFormat:=wdWordDocument
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.