Properties Property
Collapse the table of content
Expand the table of content

Properties Property [Excel 2003 VBA Language Reference]

Office 2003

Returns a CustomProperties object representing the properties for a smart tag.


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


Use the Add Method with the Properties property to store extra metadata for a smart tag.


This example adds a smart tag to cell A1, then adds extra metadata called "Market" with the value of "Nasdaq" to the smart tag and then returns the value of the property to the user. This example assumes the host system is connected to the Internet.

Sub UseProperties()

    Dim strLink As String
    Dim strType As String

    ' Define smart tag 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

    ' Add a property for MSFT smart tag and define it's value.
    Range("A1").SmartTags.Add(strLink).Properties.Add _
        Name:="Market", Value:="Nasdaq"

    ' Notify the user of the smart tag's value.
    MsgBox Range("A1").SmartTags.Add(strLink).Properties("Market").Value

End Sub

Applies to | SmartTag Object

© 2015 Microsoft