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

Objet Application

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.