返回一个 SmartTags 对象,该对象代表文档中一个智能标记。
expression.SmartTags
expression 必需。该表达式返回“应用于”列表中的一个对象。
本示例为文档中的第一个智能标记添加自定义属性。
Sub NewSmartTagProperty() ActiveDocument.SmartTags(1).Properties _ .Add Name:="President", Value:=True End Sub