WorkbookBase.SheetFollowHyperlink, événement
Se produit lors d'un clic sur un lien hypertexte dans un classeur.
Espace de noms : Microsoft.Office.Tools.Excel
Assembly : Microsoft.Office.Tools.Excel.v4.0.Utilities (dans Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)
Syntaxe
'Déclaration
Public Event SheetFollowHyperlink As WorkbookEvents_SheetFollowHyperlinkEventHandler
public event WorkbookEvents_SheetFollowHyperlinkEventHandler SheetFollowHyperlink
Exemples
L'exemple de code suivant illustre un gestionnaire pour l'événement SheetFollowHyperlink.Le gestionnaire d'événements conserve une liste de tous les liens hypertexte dans le classeur actuel sur lequel l'utilisateur a cliqué, plus les noms des feuilles de calcul qui contiennent ces liens hypertexte, dans un contrôle ListBox.
Cet exemple illustre une personnalisation au niveau du document.
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);
}
Sécurité .NET Framework
- Confiance totale accordée à l'appelant immédiat. Ce membre ne peut pas être utilisé par du code d'un niveau de confiance partiel. Pour plus d'informations, consultez Utilisation de bibliothèques à partir de code d'un niveau de confiance partiel.