WebNavigationBarSets オブジェクト (発行元)

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

注釈

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

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

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

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

ドキュメントのすべてのページに指定の Web ナビゲーション バーを追加するには、AddToEveryPage メソッドの Left、Top、および Width パラメーターを使用します。ここで、Left はページの左からナビゲーション バーの左端までの距離、Top はページの上部からナビゲーション バーの上端までの距離です。 幅はナビゲーション バーの幅です。

例

次の使用例は、アクティブ ドキュメントの WebNavigationBarSets コレクションにオブジェクト変数を設定します。

Dim objWebNavBarSets As WebNavigationBarSets 
Set objWebNavBarSets = ActiveDocument.WebNavigationBarSets

次の例では、 WebNavigationBarSets コレクションから最初の Web ナビゲーション バー セットを返します。

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

上記の例は、WebNavigationBarSets (index) を使用して WebNavigationBarSet オブジェクトを返すことによっても実現できます。ここで、index はインデックス番号です。

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 のサポートおよびフィードバックを参照してください。

  • Last updated on