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

Объект WebNavigationBarSets (Издатель)

  • Статья

Коллекция всех объектов WebNavigationBarSet в текущем документе. Каждый объект WebNavigationBarSet представляет набор панели веб-навигации, состоящий из гиперссылок.

Замечания

По умолчанию на каждой странице веб-мастера есть два объекта WebNavigationBarSet ; один из них является текстовым, а второй — вертикальным. Эти объекты соответствуют структуре мастера независимо от того, используется ли панель навигации на странице.

Используйте свойство WebNavigationBarSets текущего документа, чтобы вернуть объект WebNavigationBarSets .

Используйте item (index), где index — это номер индекса, чтобы вернуть объект WebNavigationBarSet из коллекции.

Используйте свойство Count , чтобы вернуть количество наборов панели веб-навигации в коллекции.

Чтобы добавить указанную панель веб-навигации на каждую страницу документа, используйте параметры Left, Top и Width метода AddToEveryPage , где Left — это расстояние от левого края страницы до левого края панели навигации, а Top — расстояние от верхней части страницы до верхнего края панели навигации. и Ширина — это ширина панели навигации.

Пример

В следующем примере задается объектная переменная для коллекции WebNavigationBarSets активного документа.

Dim objWebNavBarSets As WebNavigationBarSets 
Set objWebNavBarSets = ActiveDocument.WebNavigationBarSets

В следующем примере возвращается первый набор панели веб-навигации из коллекции WebNavigationBarSets .

Dim objWebNavBarSet As WebNavigationBarSet 
Set objWebNavBarSet = ActiveDocument.WebNavigationBarSets.Item(1)

Предыдущий пример также можно выполнить с помощью WebNavigationBarSets (index), где index — это номер индекса, чтобы вернуть объект WebNavigationBarSet .

Dim objWebNavBarSet As WebNavigationBarSet 
Set objWebNavBarSet = ActiveDocument.WebNavigationBarSets(1)

Предыдущий пример также можно выполнить с помощью WebNavigationBarSets (index), где index — это строка, указывающая имя возвращаемой панели веб-навигации.

Dim objWebNavBarSet As WebNavigationBarSet 
Set objWebNavBarSet = ActiveDocument.WebNavigationBarSets("WebNavBarSet1")

В этом примере отображается количество наборов панели веб-навигации в текущем документе.

MsgBox ActiveDocument.WebNavigationBarSets.Count

В следующем примере панель навигации с именем WebNavBarSet1 добавляется на каждую страницу текущей публикации.

ActiveDocument.WebNavigationBarSets.Item _ 
 ("WebNavBarSet1").AddToEveryPage _ 
 Left:=50, Top:=25

Методы

Свойства

См. также

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

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