Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
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.