OLEObject.Application property (Visio)
Returns the instance of Microsoft Visio that is associated with an object. Read-only.
expression A variable that represents an OLEObject object.
The following Microsoft Visual Basic for Applications (VBA) macro gets the Application object associated with the active document and prints its process ID number in the Immediate window.
Public Sub Application_Example() Dim vsoApplication As Visio.Application Dim vsoDocument As Visio.Document Set vsoDocument = ActiveDocument 'Get the instance of Visio associated with the Document object. Set vsoApplication = vsoDocument.Application Debug.Print "The process ID of the Application object associated with the active document is: " & vsoApplication.ProcessID End Sub
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.