Shape.WebNavigationBarSetName 属性 (Publisher)

返回一个 String 类型的值，该值代表指定形状为 实例的 Web 导航栏集的名称。 此为只读属性。

语法

表达式。WebNavigationBarSetName

表达 一个代表 Shape 对象的变量。

返回值

String

备注

只有表示 Web 导航栏集实例的形状才能访问此属性。 使用 Type 属性可以确定形状是否表示 Web 导航栏集的实例。

使用 WebNavigationBarSetName 属性返回一个 WebNavigationBarSet 对象的名称。 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。