Поделиться через


Worksheet.SmartTags Свойство (2007 System)

Обновлен: Ноябрь 2007

Возвращает объект Microsoft.Office.Interop.Excel.SmartTags, представляющий коллекцию смарт-тегов рабочего листа.

Пространство имен:  Microsoft.Office.Tools.Excel
Сборка:  Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
<BrowsableAttribute(False)> _
Public ReadOnly Property SmartTags As SmartTags
'Применение
Dim instance As Worksheet
Dim value As SmartTags

value = instance.SmartTags
[BrowsableAttribute(false)]
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.");
}

Разрешения

См. также

Ссылки

Worksheet Класс

Worksheet - члены

Microsoft.Office.Tools.Excel - пространство имен