Un truc tout bête mais que je n'arrive pas à faire :
J'ai des cellules en colonne A qui ont pour certaines des URL rattachées (visibles par clic droit - hyperlink). Elles sont donc en bleu, et si je clique cela ouvre le site web.
J'aimerais, en colonne B, récupérer cette URL comme valeur de cellule.
Re : Extraire URL "web" d'une cellule comme valeur d'une autre
Bonjour ElfeErrant,
avec une fonction personnalisée :
Code:
Function AdresseLien(Cellule As Range) As String
AdresseLien = ""
On Error GoTo Err_Lien
AdresseLien = Cellule.Hyperlinks(1).Address
On Error GoTo 0
Exit Function
Err_Lien:
End Function