返回一个应用程序的 SmartTagRecognizers 集合。
expression.SmartTagRecognizers
expression 必需。该表达式返回“应用于”列表中的对象之一。
在本示例中,Microsoft Excel 显示应用程序可使用的第一个智能标记的标识符项目,否则将显示一条不存在该标识符项目的消息。
Sub CheckforSmartTagRecognizers()
' Handle run-time error if no smart tag recognizers exist.
On Error Goto No_SmartTag_Recognizers_In_List
' Notify the user of the first smart tag recognizer item.
MsgBox "The first smart tag recognizer is: " & _
Application.SmartTagRecognizers.Item(1)
Exit Sub
No_SmartTag_Recognizers_In_List:
MsgBox "No smart tag recognizers exist in list."
End Sub