Partager via


Worksheet.FollowHyperlink, événement (System 2007)

Mise à jour : novembre 2007

Se produit lors d'un clic sur un lien hypertexte dans une feuille de calcul.

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

Syntaxe

Public Event FollowHyperlink As DocEvents_FollowHyperlinkEventHandler

Dim instance As Worksheet
Dim handler As DocEvents_FollowHyperlinkEventHandler

AddHandler instance.FollowHyperlink, handler
public event DocEvents_FollowHyperlinkEventHandler FollowHyperlink

Exemples

L'exemple de code suivant montre un gestionnaire pour l'événement FollowHyperlink qui conserve une liste de tous les liens hypertexte dans le classeur actuel sur lequel l'utilisateur a cliqué, plus les noms des feuilles de calcul qui contiennent ces liens hypertexte, dans un contrôle ListBox.

Cet exemple illustre une personnalisation au niveau du document.

Private listBox1 As ListBox
Private Sub WorksheetFollowHyperlink()
    listBox1 = Me.Controls.AddListBox(Me.Range("B2", "C3"), _
        "listBox1")
End Sub

Sub Worksheet1_FollowHyperlink(ByVal Target As Excel.Hyperlink) _
    Handles Me.FollowHyperlink
    listBox1.Items.Add(Me.Name & ":" & Target.Address)
End Sub
private ListBox listBox1;

private void WorksheetFollowHyperlink()
{
    listBox1 = this.Controls.AddListBox(
        this.Range["B2", "C3"], "listBox1");

    this.FollowHyperlink += 
        new Excel.DocEvents_FollowHyperlinkEventHandler(
        Worksheet1_FollowHyperlink);
}

void Worksheet1_FollowHyperlink(Excel.Hyperlink Target)
{
    listBox1.Items.Add(this.Name + ":" + Target.Address);
}

Autorisations

Voir aussi

Référence

Worksheet, classe

Membres Worksheet

Microsoft.Office.Tools.Excel, espace de noms