Besoin assez rare jusqu’à ce qu’il se présente, l’extraction de liens hypertexte d’une cellule sous Excel est simple en principe, mais non prévue par le logiciel.
Pour lister l’adresse vers lesquels pointent vos liens, un moyen est de créer une fonction VBA
Alt+F11 > Insertion > Module > Coller la fonction > Alt+Q
La fonction VBA à copier :
Function AdrHyperlien(cell As Range)
AdrHyperlien = cell.Hyperlinks(1).Address
End Function
Ce qui vous crée la formule
=AdrHyperlien( )
Que vous copiez et incrémentez dans une colonne pour un résultat comme ça :
Source : excelabo.net