Close Method [Visio 2003 SDK Documentation]
Closes a window, document, or master.
object**.Close**
object Required. An expression that returns the Window, Document, or Master object to close.
Version added
2.0
Remarks
If the indicated window is the only window open for a document and the document contains unsaved changes, an alert appears asking if you want to save the document. You can use the AlertResponse property to prevent the alert from appearing.
If you close a docked stencil window, only that window is closed. However, if you close a drawing window that contains docked stencils, the docked stencil window is also closed.
Use the Close method for a Master object after opening a master for editing using the Open method. The Close method pushes any changes made to the master while it was open to instances of the master.
Example
This example shows how to close all open ShapeSheet windows. It assumes at least one ShapeSheet window is open in Microsoft Office Visio.
Public Sub Close_Example()
Dim intCounter As Integer
intCounter = Windows.Count
'Close all ShapeSheet windows that are open.
While intCounter <> 0
If Windows(intCounter).Type = visSheet Then
Windows(intCounter).Close
intCounter = Windows.Count
Else
intCounter = intCounter - 1
End If
Wend
End Sub
Applies to | Document object | Master object | Window object
See Also | AlertResponse property | Open method