Returns a CustomProperties object representing the properties for a smart tag. Read-only
Syntax
expression.Properties
expression A variable that represents a SmartTag object.
Remarks
Use the Add method with the Properties property to store extra metadata for a smart tag.
Example
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.
Visual Basic for Applications
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).<strong class="bterm">Properties</strong>.Add _
Name:="Market", Value:="Nasdaq"
' Notify the user of the smart tag's value.
MsgBox Range("A1").SmartTags.Add(strLink).<strong class="bterm">Properties</strong>("Market").Value