Udostępnij za pośrednictwem


Właściwość WorkbookBase.VstoSmartTags —

Pobiera Microsoft.Office.Tools.SmartTagCollection skojarzone ze skoroszytem.Ten typ lub element członkowski jest przeznaczony do stosowania wyłącznie w projektach dla systemu Microsoft Office 2007. W systemie Office 2010 tagi inteligentne nie są już używane.
.

Przestrzeń nazw:  Microsoft.Office.Tools.Excel
Zestaw:  Microsoft.Office.Tools.Excel.v4.0.Utilities (w Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Składnia

'Deklaracja
Public ReadOnly Property VstoSmartTags As SmartTagCollection
public SmartTagCollection VstoSmartTags { get; }

Wartość właściwości

Typ: Microsoft.Office.Tools.SmartTagCollection
Microsoft.Office.Tools.SmartTagCollection Skojarzone ze skoroszytem.

Przykłady

Poniższy przykład kodu tworzy tagu inteligentnego, który ustawia kolor czcionki w komórce na niebieski, gdy termin "niebieski" jest rozpoznawana.W przykładzie dodano tagów inteligentnych w skoroszycie za pomocą VstoSmartTags właściwości.

Ten przykład dotyczy dostosowywania na poziomie dokumentu.

WithEvents ColorText As Microsoft.Office.Tools.Excel.Action

Private Sub AddSmartTag()
    Dim ColorTag As Microsoft.Office.Tools.Excel.SmartTag = _
        Globals.Factory.CreateSmartTag( _
        "www.contoso.com/Demo#DemoSmartTag", "Demo Smart Tag")

    Dim ColorText As Microsoft.Office.Tools.Excel.Action = _
        Globals.Factory.CreateAction("Color text blue")
    AddHandler ColorText.Click, AddressOf ColorText_Click

    ColorTag.Actions = _
        New Microsoft.Office.Tools.Excel.Action() {ColorText}
    ColorTag.Terms.Add("blue")
    Me.VstoSmartTags.Add(ColorTag)
End Sub

Private Sub ColorText_Click(ByVal sender As Object, _
    ByVal e As Microsoft.Office.Tools.Excel.ActionEventArgs)
    e.Range.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Blue)
End Sub
private void AddSmartTag()
{
    Microsoft.Office.Tools.Excel.SmartTag colorTag =
        Globals.Factory.CreateSmartTag(
        "www.contoso.com/Demo#DemoSmartTag", "Demo Smart Tag");

    Microsoft.Office.Tools.Excel.Action colorText =
        Globals.Factory.CreateAction("Color text blue");
    colorText.Click +=
        new Microsoft.Office.Tools.Excel.ActionClickEventHandler(
        colorText_Click);

    colorTag.Actions =
        new Microsoft.Office.Tools.Excel.Action[] { colorText };
    colorTag.Terms.Add("blue");
    this.VstoSmartTags.Add(colorTag);
}

private void colorText_Click(object sender,
    Microsoft.Office.Tools.Excel.ActionEventArgs e)
{
    e.Range.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Blue);
}

Zabezpieczenia programu .NET Framework

Zobacz też

Informacje

WorkbookBase Klasa

Przestrzeń nazw Microsoft.Office.Tools.Excel