trouver un lien hyper texte

[fred17630]

Bonjour à tous

Je n'arrive pas à trouver un lien hyper texte commandant l'ouverture un fichier word. Mon fichier excel comporte une vingtaine d'onglets.
Tous mes liens hypertextes fonctionnent mais j'en ai un qui c'est crée et que je ne trouve pas.
Pouvez vous m'aider ?

 

[tototiti2008]

Re : trouver un lien hyper texte

Bonjour fred17630,

peut-être avec une macro comme ça ? (il faut la lancer à partir d'une feuille où la colonne A est libre)

Sub RechercheHL()
Dim Wks As Worksheet, HL As Hyperlink
    For Each Wks In ThisWorkbook.Worksheets
        For Each HL In Wks.Hyperlinks
            ActiveSheet.Range("A65536").End(xlUp).Offset(1, 0).Value = _
             Wks.Name & " - " & HL.Range.Address & " - " & HL.Range.Value & " - " & HL.Address
        Next HL
    Next Wks
End Sub

 

[fred17630]

Re : trouver un lien hyper texte

ok merci tototiti2008