Re : recuperer contenu cellule contenant le lien hypertexte
Bonjour copayo,
à tester :
Code:
Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)
ThisWorkbook.Worksheets("Feuil1").Range("A1").Value = Target.Range.Value
End Sub