Worksheet.FollowHyperlink 事件 (2007 system)
更新：2007 年 11 月
在单击工作表上的任意超链接时发生。
命名空间： Microsoft.Office.Tools.Excel
程序集： Microsoft.Office.Tools.Excel.v9.0（在 Microsoft.Office.Tools.Excel.v9.0.dll 中）
语法
声明
Public Event FollowHyperlink As DocEvents_FollowHyperlinkEventHandler
用法
Dim instance As Worksheet
Dim handler As DocEvents_FollowHyperlinkEventHandler
AddHandler instance.FollowHyperlink, handler
public event DocEvents_FollowHyperlinkEventHandler FollowHyperlink
示例
下面的代码示例演示 FollowHyperlink 事件的处理程序，该处理程序在一个 ListBox 控件中保存当前工作簿中所有单击过的超链接的列表，以及包含这些超链接的工作表的名称。
此示例针对的是文档级自定义项。
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);
}
权限
- 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关更多信息，请参见通过部分受信任的代码使用库。