Evento WorkbookBase.SheetFollowHyperlink

Artigo
08/01/2011

Ocorre quando você clicar em qualquer hiperlink em uma pasta de trabalho.

Namespace: Microsoft.Office.Tools.Excel
Assembly: Microsoft.Office.Tools.Excel.v4.0.Utilities (em Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

Sintaxe

'Declaração
Public Event SheetFollowHyperlink As WorkbookEvents_SheetFollowHyperlinkEventHandler

public event WorkbookEvents_SheetFollowHyperlinkEventHandler SheetFollowHyperlink

Exemplos

O exemplo de código a seguir demonstra um manipulador para o SheetFollowHyperlink de evento. O manipulador de eventos mantém uma lista de todos os hiperlinks a pasta de trabalho atual que tenham sido clicados, além dos nomes das planilhas que contêm esses hiperlinks em um ListBox de controle.

Este exemplo é para uma personalização em nível de 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);
}

Segurança do .NET Framework

Confiança total para o chamador imediato. O membro não pode ser usado por código parcialmente confiável. Para obter mais informações, consulte Usando bibliotecas de código parcialmente confiáveis.

Consulte também

Referência

WorkbookBase Classe

Namespace Microsoft.Office.Tools.Excel

Partilhar via