Поделиться через


Свойство Shapes.Application (Visio)

Возвращает экземпляр Microsoft Visio, связанный с объектом . Только для чтения.

Синтаксис

expression. Приложения

выражение: переменная, представляющая объект Shapes.

Возвращаемое значение

Приложение

Пример

Следующий макрос Microsoft Visual Basic для приложений (VBA) получает объект Application, связанный с активным документом, и выводит его идентификатор процесса в окне Интерпретация.

 
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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.