Свойство PageSetup.Application (Publisher)
При использовании без квалификатора объектов это свойство возвращает объект Application , представляющий текущий экземпляр Publisher.
При использовании с квалификатором объектов это свойство возвращает объект Application , представляющий создателя указанного объекта.
При использовании с объектом OLE Automation он возвращает приложение объекта.
Синтаксис
expression. Приложения
Выражение Переменная, представляющая объект PageSetup .
Пример
В этом примере отображаются сведения о версии и сборке для Publisher.
With Application
MsgBox "Current Publisher: version " _
& .Version & " build " & .Build
End With
В этом примере отображается имя приложения, создавшего каждый связанный объект OLE на одной странице активной публикации.
Dim shpOle As Shape
For Each shpOle In ActiveDocument.Pages(1).Shapes
If shpOle.Type = pbLinkedOLEObject Then
MsgBox shpOle.OLEFormat.Application.Name
End If
Next
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.