WebNavigationBarSets 物件 (Publisher)

目前檔中所有 WebNavigationBarSet 物件的集合。 每個 WebNavigationBarSet 物件代表包含超連結的 web 導覽列集。

註解

根據預設,每個 web 嚮導頁面上都有兩個 WebNavigationBarSet 物件;一個是純文字,另一個是垂直。 這些物件會對應至嚮導的設計,不論頁面上是否使用導覽列。

使用目前檔的 WebNavigationBarSets 屬性可傳回 WebNavigationBarSets 物件。

使用 專案 (Index) ,其中 index 是索引編號,可以傳回集合中的 WebNavigationBarSet 物件。

使用 Count 屬性可傳回集合中的 web 導覽列集的數目。

若要將指定的 web 導覽列新增至檔的每一頁,請使用 leftTopWidth 參數的 AddToEveryPage 方法,其中從頁面左邊緣到導覽列左邊緣的距離, top 是從 頁面頂端到導覽列的上邊緣的距離,而 width 是導覽列的寬度。

範例

下列範例會將物件變數設定為使用中文件的 WebNavigationBarSets 集合。

Dim objWebNavBarSets As WebNavigationBarSets 
Set objWebNavBarSets = ActiveDocument.WebNavigationBarSets

下列範例會傳回從 WebNavigationBarSets 集合中的第一個 web 導覽列集。

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 是指出 web 導覽列設定為傳回的名稱的字串。

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

本範例會顯示目前檔中的 web 導覽列集數目。

MsgBox ActiveDocument.WebNavigationBarSets.Count 


下列範例會將名為 WebNavBarSet1 的導覽列新增至目前出版物中的每一頁。

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

方法

屬性

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應