Freigeben über


Workbook.VstoSmartTags-Eigenschaft

Ruft die mit der Arbeitsmappe verknüpfte Microsoft.Office.Tools.SmartTagCollection ab.Dieser Typ oder Member ist nur für die Verwendung in Projekten für das Microsoft Office 2007-System vorgesehen. Smarttags sind in Office 2010 veraltet.
.

Namespace:  Microsoft.Office.Tools.Excel
Assemblys:   Microsoft.Office.Tools.Excel (in Microsoft.Office.Tools.Excel.dll)
  Microsoft.Office.Tools.Excel.v4.0.Utilities (in Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntax

'Declaration
ReadOnly Property VstoSmartTags As SmartTagCollection
SmartTagCollection VstoSmartTags { get; }

Eigenschaftswert

Typ: Microsoft.Office.Tools.SmartTagCollection
Die mit der Arbeitsmappe verknüpfte Microsoft.Office.Tools.SmartTagCollection.

Beispiele

Im folgenden Codebeispiel wird ein Smarttag erstellt, mit dem die Schriftfarbe einer Zelle auf Blau festgelegt wird, wenn der Begriff "blue" (Blau) erkannt wird.Das Smarttag wird der Arbeitsmappe mithilfe der VstoSmartTags-Eigenschaft hinzugefügt.

Diese Version bezieht sich auf ein Add-In auf Anwendungsebene.

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

Private Sub AddSmartTag()
    Dim vstoWorkbook As Workbook = Globals.Factory.GetVstoObject(Me.Application.ActiveWorkbook)
    Dim ColorTag As 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")
    vstoWorkbook.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);

    Workbook vstoWorkbook = Globals.Factory.GetVstoObject(this.Application.ActiveWorkbook);

    colorTag.Actions =
        new Microsoft.Office.Tools.Excel.Action[] {
            colorText };
    colorTag.Terms.Add("blue");
    vstoWorkbook.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);
}

.NET Framework-Sicherheit

Siehe auch

Referenz

Workbook Schnittstelle

Microsoft.Office.Tools.Excel-Namespace