Lien Hypertexte affichage de l'adresse

Bonjour,

j'ai une feuille excel avec un grand nombre d'entrée. Une colonne a des liens hypertexte qui ont été nommés. Comment faire pour que je puisse mettre dans une autre colonne l'adresse du lien en "un clique" pour toutes les entrées? Sans devoir le faire une à une et sans macro!

Merci de votre aide

Noëlle

bonjour

utilise la fonction

= LIENHYPERTEXTE(cellulecontenantl'adresse)

Malheureusement ca ne marche pas, ca me remet le nom.

J'explique peut-être différemment:

voici un nom de ma colonne: Du 8 au 22 juillet 2014 Vietnam

Ce nom a un lien hypertexte, adresse que je ne vois pas dans le fichier mais que je sais comment afficher un a un.

Ce que j'aimerai c'est que l'adresse du lien apparaisse.

Si dans une autre colonne, j'utilise la formule =lien_hypertexte(cellule ou il y a le nom ci-dessus), le nom ci-dessus apparait alors que je veux l'adresse du lien et non le nom.

Je peux le faire un a un mais j'en ai 300!

Merci de votre aide

Noëlle

re

pas compris

joins un extrait de ton fichier, c'est toujours plus parlant

voici à quoi ressemble le fichier, simplifié. En résumé, la colonne voyage a les références du voyage du client avec le nom x et en cliquant dessus on arrive sur un fichier se trouvant sur le serveur local. Tu ne pourras donc pas accéder au lien.

Dans la colonne à côté, il faudrait que l'adresse apparaisse, soit par exemple pour le 1er fichier: ../Caroline/2014/Facture%20XLS/Ambert%20Jack%20Andre%20Fernand.xls

Comme dit précédemment, je sais le faire un a un en copiant-collant mais j'aimerai pouvoir le faire en une fois. Il y a plus de 300 et ca va se rajouter.

re

il y a des réponses sur Google (pas trouvé sur Excel Pratique, dommage)

par exemple sur DeveIoppez.com (je cite le nom par respect pour leur travail)

La procédure suivante extrait les liens hypertextes contenus dans la colonne A.

Les adresses s'inscrivent à coté, dans la colonne B.

Sub ExtractionLiensHypertextes()
    Dim Cell As Range
    Dim Ligne As Integer

    'Récupère le numéro de la dernière ligne non vide
    Ligne = Columns(1).SpecialCells(xlCellTypeLastCell).Row

    'Boucle sur les cellules de la colonne A
    For Each Cell In Range("A1:A" & Ligne)
        If Cell.Hyperlinks.Count > 0 Then _
            Cell.Offset(0, 1) = Cell.Hyperlinks(1).Address
    Next Cell
End Sub

Merci mais c'est une macro et je ne connais pas. Ou comment pouvoir faire une macro? Il faut un excel spécial ou un autre programme? Je ne l'ai pas trouvé dans excel.

Merci

Noëlle