WorkbookBase.SheetFollowHyperlink イベント
ブック内のハイパーリンクがクリックされると発生します。
名前空間: Microsoft.Office.Tools.Excel
アセンブリ: Microsoft.Office.Tools.Excel.v4.0.Utilities (Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 内)
構文
'宣言
Public Event SheetFollowHyperlink As WorkbookEvents_SheetFollowHyperlinkEventHandler
public event WorkbookEvents_SheetFollowHyperlinkEventHandler SheetFollowHyperlink
例
SheetFollowHyperlink イベント用ハンドラーのコード例を次に示します。このイベント ハンドラーは、現在のブック内でクリックされたすべてのハイパーリンクのリスト、およびこれらのハイパーリンクを含むワークシートの名前を、ListBox コントロールに保持します。
この例は、ドキュメント レベルのカスタマイズ用に作成されています。
Private ListBox1 As ListBox
Private Sub WorkbookSheetFollowHyperlink()
ListBox1 = Globals.Sheet1.Controls.AddListBox( _
Globals.Sheet1.Range("B2", "C3"), "listBox1")
End Sub
Sub ThisWorkbook_SheetFollowHyperlink(ByVal Sh As Object, _
ByVal Target As Excel.Hyperlink) Handles Me.SheetFollowHyperlink
Dim sheet As Excel.Worksheet = CType(Sh, Excel.Worksheet)
ListBox1.Items.Add(sheet.Name & ":" & Target.Address)
End Sub
private ListBox listBox1;
private void WorkbookSheetFollowHyperlink()
{
listBox1 = Globals.Sheet1.Controls.AddListBox(
Globals.Sheet1.Range["B2", "C3"], "listBox1");
this.SheetFollowHyperlink +=
new Excel.WorkbookEvents_SheetFollowHyperlinkEventHandler(
ThisWorkbook_SheetFollowHyperlink);
}
void ThisWorkbook_SheetFollowHyperlink(object Sh,
Excel.Hyperlink Target)
{
Excel.Worksheet sheet = (Excel.Worksheet)Sh;
listBox1.Items.Add(sheet.Name + ":" + Target.Address);
}
.NET Framework セキュリティ
- 直前の呼び出し元に対する完全な信頼。このメンバーは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。