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
- Plena confianza para el llamador inmediato. Un código de confianza parcial no puede utilizar este miembro. Para obtener más información, vea Utilizar bibliotecas de código que no es de plena confianza.
Vea también
Referencia
Microsoft.Office.Tools.Excel (Espacio de nombres)