[VBA-E]copie de lien hypertexte

bonjour a tous,
je suis un novice en visual basic (étude de gestion),mais j'essaye de me débrouiller. cependant dans le cadre d'un projet VB, il y a une chose sur laquelle je bloque.

j'ai des liens hypertextes sur ma feuille excel menant a différentes pages internet. je voudrais copier uniquement le texte de ce lien et les copier dans les cellules situées a droite du lien.
pour l'instant je n'y arrive pas. si quelqu'un peut m'éclairer.
merci d'avance.

Tu veux copier le texte qui est en hyperlien dans la cellule juste à coté, c'est bien ça?

tu peut essayer de copier la cellule contenant l'hyperlien vers l'autre cellule et ensuite supprimer l'hyperlien.

Quelque chose du genre

Code:

---

1 2	Cells(#ligne, #colonne).Copy Cells(#ligne, #colonne+1) Cells(#ligne, #colonne+1).Hyperlinks(1).Delete

---

Pour t'aider, utilise l'enregistreur de macro: tu crée une nouvelle macro, tu fais ce que tu veut que le macro exécute, ensuite tu l'arrête et tu peux voir le code que ca donne. Ca peut toujours dépanner.

merci beaucoup pour ta réponse, mais le probleme c'est que le texte qui active l'hyperlien est différent de l'adresse. . je vient de trouver une solution pour ceux qui auront le meme probleme plus tard.

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim maplage As Range Set maplage = Range("c5:c300")   For i = 1 To maplage.Cells.Count If maplage.Cells(i).EntireRow.Hidden = False Then maplage.Cells(i).Select   maplage.Cells(i).Offset(0, 1).Value = Selection.Hyperlinks(1).Address End If Next i

---

pour l'enregistreur de macro j'avais essayer. mais sur ce coup la ca m'a pas vraiment aidé. merci beaucoup de ton aide.
sympa ce site:D

Il ne te reste plus qu'a inscrire ta discussion comme Résolue!, soit dans Outils de la discussion et je crois que tu à aussi un bouton résolue en bas completement.

A+