Shape.WebNavigationBarSetName プロパティ (Publisher)
指定した図形のインスタンスである Web ナビゲーション バー セットの名前を表す 文字列型 (String) の値を返します。 読み取り専用です。
構文
式。WebNavigationBarSetName
式Shape オブジェクトを表す変数。
戻り値
文字列
注釈
このプロパティには、Web ナビゲーション バー セットのインスタンスを表す図形にのみアクセスできます。 Type プロパティを使用して、図形が Web ナビゲーション バー セットのインスタンスを表しているかどうかを判断します。
WebNavigationBarSet オブジェクトの名前を取得するのにには、 WebNavigationBarSetName プロパティを使用します。 Web 文書内の複数のページには、それぞれ同じ Web ナビゲーション バー セットのインスタンスを表す図形を含めることができます。 WebNavigationBarSet オブジェクトに加えられた変更は、その Web ナビゲーション バー セットのインスタンスを表すすべての図形に反映されます。
例
次の例では、作業中の文書の最初のページで Web ナビゲーション バーのインスタンスを表す図形を調べるテストを行います。 見つかったこのような図形ごとに、インスタンスを表す Web ナビゲーション バーが自動更新に設定されます ( 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 のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示