Freigeben über


Worksheet.FollowHyperlink-Ereignis (2007 System)

Aktualisiert: November 2007

Tritt auf, wenn Sie auf einen Link auf einem Arbeitsblatt klicken.

Namespace:  Microsoft.Office.Tools.Excel
Assembly:  Microsoft.Office.Tools.Excel.v9.0 (in Microsoft.Office.Tools.Excel.v9.0.dll)

Syntax

Public Event FollowHyperlink As DocEvents_FollowHyperlinkEventHandler

Dim instance As Worksheet
Dim handler As DocEvents_FollowHyperlinkEventHandler

AddHandler instance.FollowHyperlink, handler
public event DocEvents_FollowHyperlinkEventHandler FollowHyperlink

Beispiele

Im folgenden Codebeispiel wird ein Handler für das FollowHyperlink-Ereignis veranschaulicht, das eine Liste aller angeklickten Links in der aktuellen Arbeitsmappe enthält sowie die Namen der Arbeitsblätter mit diesen Links in einem ListBox-Steuerelement.

Dieses Beispiel bezieht sich auf eine Anpassung auf Dokumentebene.

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

Berechtigungen

Siehe auch

Referenz

Worksheet-Klasse

Worksheet-Member

Microsoft.Office.Tools.Excel-Namespace