Compartir a través de


Workbook.SheetFollowHyperlink (Evento) (2007 System)

Actualización: noviembre 2007

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.v9.0 (en Microsoft.Office.Tools.Excel.v9.0.dll)

Sintaxis

Public Event SheetFollowHyperlink As WorkbookEvents_SheetFollowHyperlinkEventHandler

Dim instance As Workbook
Dim handler As WorkbookEvents_SheetFollowHyperlinkEventHandler

AddHandler instance.SheetFollowHyperlink, handler
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);
}

Permisos

Vea también

Referencia

Workbook (Clase)

Workbook (Miembros)

Microsoft.Office.Tools.Excel (Espacio de nombres)