Partager via


WorkbookBase.VstoSmartTags, propriété

Obtient le Microsoft.Office.Tools.SmartTagCollection associé au classeur. Ce type ou ce membre vise à être utilisé uniquement dans les projets pour la version 2007 de Microsoft Office System. Les balises actives sont déconseillées dans Office 2010.
.

Espace de noms :  Microsoft.Office.Tools.Excel
Assembly :  Microsoft.Office.Tools.Excel.v4.0.Utilities (dans Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Syntaxe

'Déclaration
Public ReadOnly Property VstoSmartTags As SmartTagCollection
public SmartTagCollection VstoSmartTags { get; }

Valeur de propriété

Type : Microsoft.Office.Tools.SmartTagCollection
Microsoft.Office.Tools.SmartTagCollection associé au classeur.

Exemples

L'exemple de code suivant crée une balise active qui affecte la couleur bleue à la police d'une cellule lorsque le terme "blue" est reconnu. L'exemple ajoute la balise active au classeur en utilisant la propriété VstoSmartTags.

Cet exemple illustre une personnalisation au niveau du document.

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

Sécurité .NET Framework

Voir aussi

Référence

WorkbookBase Classe

Microsoft.Office.Tools.Excel, espace de noms