Compartir a través de


Workbook.VstoSmartTags (Propiedad)

Obtiene la colección Microsoft.Office.Tools.SmartTagCollection asociada con el libro.

Espacio de nombres:  Microsoft.Office.Tools.Excel
Ensamblado:  Microsoft.Office.Tools.Excel (en Microsoft.Office.Tools.Excel.dll)

Sintaxis

'Declaración
ReadOnly Property VstoSmartTags As SmartTagCollection
    Get
SmartTagCollection VstoSmartTags { get; }

Valor de propiedad

Tipo: Microsoft.Office.Tools.SmartTagCollection
Colección Microsoft.Office.Tools.SmartTagCollection asociada con el libro.

Ejemplos

El ejemplo de código siguiente crea una etiqueta inteligente que establece en azul el color de fuente de una celda cuando se reconoce el término "blue". El ejemplo agrega la etiqueta inteligente al libro utilizando la propiedad VstoSmartTags.

Se trata de una versión para un complemento en el nivel de la aplicación.

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);
}

Seguridad de .NET Framework

Vea también

Referencia

Workbook Interfaz

Microsoft.Office.Tools.Excel (Espacio de nombres)

Otros recursos

Información general sobre etiquetas inteligentes