Shapes.AddWebNavigationBar 方法 (Publisher)

将 pbWebNavigationBar 类型的 Shape 对象 (PbShapeType 枚举) 添加到出版物的当前页。

语法

表达式。AddWebNavigationBar (Name、 Left、 Top、 Width)

expression：一个表示 Shapes 对象的变量。

参数

名称	必需/可选	数据类型	说明
Name	必需	字符串	要添加到指定形状的 WebNavigationBarSet 对象的名称。
Left	必需	Variant	表示 Web 导航栏集的形状左边缘的位置。
Top	必需	Variant	表示 Web 导航栏集的形状上边缘的位置。
Width	可选	Variant	表示 Web 导航栏集的形状的宽度。

返回值

Shape

说明

AddWebNavigationBar 方法不会创建 Web 导航栏集。 它从 WebNavigationBarSets 集合添加现有集。 将现有 Web 导航栏集的名称作为 Name 参数传递。

示例

下面的 Microsoft Visual Basic for Applications (VBA) 宏显示如何使用 AddWebNavigationBar 方法将 WebNavigationBarSet 对象添加到活动文档。

Public Sub AddWebNavigationBarSet_Example() 
 
 Dim pubShape As Publisher.Shape 
 
 ThisDocument.WebNavigationBarSets.AddSet ("NavBar") 
 Set pubShape = ThisDocument.Pages(1).Shapes.AddWebNavigationBar("NavBar", 10, 25) 
 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。