EmbedSmartTags 属性

如果为 True，则在指定的工作簿上嵌入智能标记。Boolean 类型，可读写。

expression   必需。该表达式返回“应用于”列表中的对象之一。

示例

在本示例中，Microsoft Excel 判断活动工作簿是否能启用智能标记，并通知用户。

Sub UseSmartTags()

    ' Determine if smart tags are enabled for this workbook.
    If ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True Then
        MsgBox "Smart tags can be embedded in this workbook."
    Else
    	MsgBox "Smart tags can not be embedded in this workbook."
    End If

End Sub