Shapes.FindShapeByWizardTag 方法 (Publisher)

返回一个 ShapeRange 对象,该对象代表由向导放置在出版物中的一个或所有形状,并带有指定的向导标记。

语法

表达式FindShapeByWizardTag (WizardTagInstance)

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

参数

名称 必需/可选 数据类型 说明
WizardTag 必需 PbWizardTag 指定要搜索的向导标记。 可以是 Microsoft 发布服务器类型库中声明的 PbWizardTag 常量之一。
实例 可选 Long 指定返回哪个带有指定向导标记的形状实例。 对于 实例 等于 n,返回具有指定向导标记的形状的第 n 个实例。 如果未指定 Instance 的值,则返回具有指定向导标记的所有形状。

返回值

ShapeRange

示例

下面的示例查找向导标记 pbWizardDate 的形状的第二个实例,并将其赋给一个变量。

Dim shpWizardTag As Shape 
 
Set shpWizardTag = ActiveDocument.FindShapeByWizardTag(WizardTag:=pbWizardDate, Instance:=2)

支持和反馈

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