WorkbookBase.SheetFollowHyperlink (Evento)
Este evento se produce al hacer clic en un hipervínculo de un libro.
Espacio de nombres: Microsoft.Office.Tools.Excel
Ensamblado: Microsoft.Office.Tools.Excel.v4.0.Utilities (en Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)
Sintaxis
'Declaración
Public Event SheetFollowHyperlink As WorkbookEvents_SheetFollowHyperlinkEventHandler
public event WorkbookEvents_SheetFollowHyperlinkEventHandler SheetFollowHyperlink
Ejemplos
En el ejemplo de código siguiente se muestra un controlador para el evento SheetFollowHyperlink.El controlador de eventos mantiene una lista de todos los hipervínculos del libro activo en los que se ha hecho clic, además de los nombres de las hojas de cálculo que contienen estos hipervínculos, en un control ListBox.
Se trata de un ejemplo para una personalización en el nivel del documento.
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);
}
Seguridad de .NET Framework
- Plena confianza para el llamador inmediato. Un código de confianza parcial no puede utilizar este miembro. Para obtener más información, vea Utilizar bibliotecas de código que no es de plena confianza.