Свойство Shape.WebNavigationBarSetName (Publisher)
Возвращает значение String , представляющее имя набора панели веб-навигации, экземпляром которому является указанная фигура. Только для чтения.
Синтаксис
expression. WebNavigationBarSetName
Выражение Переменная, представляющая объект Shape .
Возвращаемое значение
Строка
Замечания
Это свойство доступно только для фигур, представляющих экземпляр набора панели веб-навигации. Используйте свойство Type , чтобы определить, представляет ли фигура экземпляр набора панели веб-навигации.
Используйте свойство WebNavigationBarSetName , чтобы вернуть имя объекта WebNavigationBarSet . Несколько страниц в веб-публикации могут иметь фигуру, представляющую экземпляр одного набора панели веб-навигации. Изменения, внесенные в объект WebNavigationBarSet , отражаются во всех фигурах, представляющих экземпляры этого набора панели веб-навигации.
Пример
В следующем примере проверяется, какие фигуры на первой странице активного документа представляют экземпляры панели веб-навигации. Для каждой найденной такой фигуры панель веб-навигации, представляющая экземпляр, настроена на автоматическое обновление (см. также перечисление PbShapeType ).
Sub SetWebBarsToAutoUpdate()
Dim shpLoop As Shape
Dim strWebNavBarName As String
For Each shpLoop In ActiveDocument.Pages(1).Shapes
If shpLoop.Type = pbWebNavigationBar Then
strWebNavBarName = shpLoop.WebNavigationBarSetName
With ActiveDocument.WebNavigationBarSets(strWebNavBarName)
.AutoUpdate = True
End With
End If
Next
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.