Application.Quit Method (Word)

Office 2013 and later
GitHub-Mark-64px

Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

Quits Microsoft Word and optionally saves or routes the open documents.

expression .Quit(SaveChanges, Format, RouteDocument)

expression Required. A variable that represents an Application object.

Parameters

Name

Required/Optional

Data Type

Description

SaveChanges

Optional

Variant

Specifies whether Word saves changed documents before closing. Can be one of the WdSaveOptions constants.

OriginalFormat

Optional

Variant

Specifies the way Word saves documents whose original format was not Word Document format. Can be one of the WdOriginalFormat constants.

RouteDocument

Optional

Variant

True to route the document to the next recipient. If the document does not have a routing slip attached, this argument is ignored.

This example closes Word and prompts the user to save each document that has changed since it was last saved.

Application.Quit SaveChanges:=wdPromptToSaveChanges

This example prompts the user to save all documents. If the user clicks Yes, all documents are saved in the Word format before Word closes.

Dim intResponse As Integer 
 
intResponse = _ 
 MsgBox("Do you want to save all documents?", vbYesNo) 
If intResponse = vbYes Then Application.Quit _ 
 SaveChanges:=wdSaveChanges, OriginalFormat:=wdWordDocument
Show: