EmbedSmartTags Property [Excel 2003 VBA Language Reference]

True to embed smart tags on the specified workbook. Read/write Boolean.

expression.EmbedSmartTags

expression Required. An expression that returns one of the objects in the Applies To list.

Example

In this example, Microsoft Excel determines if smart tags are enabled for the active workbook and notifies the user.

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

Applies to | SmartTagOptions Object