Свойство Cell.Application (Visio)
Возвращает экземпляр Microsoft Visio, связанный с объектом . Только для чтения.
expression. Приложения
Выражение Переменная, представляющая объект Cell .
Следующий макрос 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 и обратная связь.