共用方式為


WorksheetBase.SmartTags 屬性

取得 Microsoft.Office.Interop.Excel.SmartTags 物件,表示工作表的智慧標籤集合。

命名空間:  Microsoft.Office.Tools.Excel
組件:  Microsoft.Office.Tools.Excel.v4.0.Utilities (在 Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 中)

語法

'宣告
Public ReadOnly Property SmartTags As SmartTags
    Get
public SmartTags SmartTags { get; }

屬性值

型別:Microsoft.Office.Interop.Excel.SmartTags
Microsoft.Office.Interop.Excel.SmartTags 物件,表示工作表的智慧標籤集合。

範例

下列程式碼範例會將智慧標籤增加至 NamedRange 控制項,然後使用 SmartTags 屬性顯示目前工作表上的智慧標籤數目。

這是示範文件層級自訂的範例。

Private Sub DisplaySmartTags()
    Dim NamedRange1 As Microsoft.Office.Tools.Excel.NamedRange = _
        Me.Controls.AddNamedRange(Me.Range("A1"), _
        "NamedRange1")

        Globals.ThisWorkbook.SmartTagOptions.EmbedSmartTags = True
        Globals.ThisWorkbook.Application.SmartTagRecognizers.Recognize = True

        NamedRange1.Formula = "MSFT"
        Dim SmartTag1 As Excel.SmartTag = _
            NamedRange1.SmartTags.Add( _
            "urn:schemas-microsoft-com:smarttags#StockTickerSymbol")

        MsgBox("There are " & Me.SmartTags.Count.ToString() & _
            " smart tags in this document.")
End Sub
private void DisplaySmartTags()
{
    Microsoft.Office.Tools.Excel.NamedRange NamedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", missing],
        "NamedRange1");

    Globals.ThisWorkbook.SmartTagOptions.EmbedSmartTags = true;
    Globals.ThisWorkbook.Application.SmartTagRecognizers.Recognize = true;

    NamedRange1.Formula = "MSFT";
    Excel.SmartTag SmartTag1 =
        NamedRange1.SmartTags.Add(
        "urn:schemas-microsoft-com:smarttags#StockTickerSymbol");

    MessageBox.Show("There are " + this.SmartTags.Count.ToString() +
        " smart tags in this document.");
}

.NET Framework 安全性

請參閱

參考

WorksheetBase 類別

Microsoft.Office.Tools.Excel 命名空間