Workbook![]() |
代表用智能标记可执行的选项。
可用 Workbook 对象的 SmartTagOptions 属性返回一个 SmartTagOptions 集合。
返回一个 SmartTagOptions 对象后,便可用下列属性来确定智能标记的显示选项,并确定是否在活动工作簿上嵌入智能标记。
本示例启用在活动工作簿上嵌入智能标记的功能,然后检查智能标记的显示设置。
Sub CheckDisplayOptions()
'Enable SmartTags to be embedded on the active workbook.
ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True
' Check the display options for smart tags.
Select Case ActiveWorkbook.SmartTagOptions.DisplaySmartTags
Case xlButtonOnly
MsgBox "The button for smart tags will only be displayed."
Case xlDisplayNone
MsgBox "Nothing will be displayed for smart tags."
Case xlIndicatorAndButton
MsgBox "The button and indicator will be displayed for smart tags."
End Select
End Sub