次の方法で共有


WebNavigationBarSets オブジェクト (Publisher)

現在のドキュメント内のすべての WebNavigationBarSet オブジェクトのコレクション。 各 WebNavigationBarSet オブジェクトは、ハイパーリンクで構成される Web ナビゲーション バー セットを表します。

注釈

既定では、各 Web ウィザード ページには 2 つの WebNavigationBarSet オブジェクトがあります。1 つはテキスト専用で、もう 1 つは垂直です。 これらのオブジェクトは、ページでナビゲーション バーが使用されているかどうかに関係なく、ウィザードの設計に対応します。

現在のドキュメントの WebNavigationBarSets プロパティを使用して 、WebNavigationBarSets オブジェクトを 取得します。

コレクションから WebNavigationBarSet オブジェクトを返すには、Item (index) を使用します。index はインデックス番号です。

Count プロパティを使用して、コレクション内の Web ナビゲーション バー セットの数を返します。

指定した Web ナビゲーション バーを文書のすべてのページに追加するには、AddToEveryPage メソッドの LeftTopWidth パラメーターを使用します。Left はページの左端からナビゲーション バーの左端までの距離、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) を使用して、 インデックス 番号を指定して 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 のサポートおよびフィードバックを参照してください。