通过

Shape.HasSmartArt 属性 (Word)

  • 项目

如果 SmartArt 图表形状上存在，则返回 True 。 此为只读属性。

语法

expression。 HasSmartArt

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

示例

下面的代码示例显示活动文档中的第一个形状是否包含 SmartArt。

Dim myShape As Shape 
 
Set myShape = ActiveDocument.Shapes(1) 
 
If myShape.HasSmartArt Then 
 MsgBox "The first shape contains SmartArt." 
Else 
 MsgBox "The first shape contains no SmartArt." 
End If

另请参阅

形状对象

支持和反馈

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