Share via

XML Property [Excel 2003 VBA Language Reference]

  • Article

XML property as it applies to the SmartTag object.

String

expression.XML

expression Required. An expression that returns a SmartTag object.

XML property as it applies to the XmlSchema object.

String

expression.XML

expression Required. An expression that returns a XmlSchema object.

Example

As it applies to the SmartTag object.

This example adds a smart tag to cell A1 and then displays the XML that would be passed to the action handler. This example assumes the host system is connected to the Internet.

Sub CheckXML()

    Dim strLink As String
    Dim strType As String

    ' Define SmartTag variables.
    strLink = "urn:schemas-microsoft-com:smarttags#StockTickerSymbol"
    strType = "stockview"

    ' Enable smart tags to be embedded and recognized.
    ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True
    Application.SmartTagRecognizers.Recognize = True

    Range("A1").Formula = "MSFT"

    ' Display the sample of the XML.
    MsgBox Range("A1").SmartTags.Add(strLink).XML

End Sub

Applies to | SmartTag Object | XmlSchema Object