probleme avec des liens hyertext

Salut

je suis en train de faire une appli qui execute une requete sur le net,
recupere des liens etc...
je voudrais exploiter ces liens, pour cela j'utilise la macro dispo à la
fin
de ce message. Elle fonctionne trés bien avec tous les liens que je peux
ecrire, que le texte du lien soit ou non différent de l'url.

Cette macro serait donc parfaite, sauf que qd je récupere une page sur
Ebay,
les liens vers les objets eux la fond planter!

je ne comprends pas ou est la différence entre les liens??? Lorsque je
fais
un "bouton droit/lien hypertext/copier lien" puis un coller, la copie du
lien est valide, et fonctionne avec ma macro, le seul truc c'est que qd
j'enregiste une macro au moment ou je fais ce copier coller, il
n'enregistre
qu'un copier coller normal, et si je rajoute ca dans la macro ci dessous,
les liens sont tjrs invalides :(

quelqu'un voie ou je me suis trompé???

sub lien()
i = 1
Do While i < 20
Cells(i, 2).Value = ActiveSheet.Hyperlinks(Cells(i, 1).Value).Address
i = i + 1
Loop
End Sub

merci d'avance

@ plus
Elicend
________________________

Attention adresse e-mail :
inconicoAfreePOINTfr
A = @
POINT = .
________________________

Bonsoir,

Un truc du genre :
Cells(i, 2).Value = ActiveSheet.Cells(i, 1).Hyperlinks(1).Address

n'irait-il pas mieux ?

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Elicend_News" <inconicoAfreePOINTfr> a écrit dans le message de news:
419a161c$0$30671$636a15ce@news.free.fr...

Salut

je suis en train de faire une appli qui execute une requete sur le net,
recupere des liens etc...
je voudrais exploiter ces liens, pour cela j'utilise la macro dispo à la
fin
de ce message. Elle fonctionne trés bien avec tous les liens que je peux
ecrire, que le texte du lien soit ou non différent de l'url.

Cette macro serait donc parfaite, sauf que qd je récupere une page sur
Ebay,
les liens vers les objets eux la fond planter!

je ne comprends pas ou est la différence entre les liens??? Lorsque je
fais
un "bouton droit/lien hypertext/copier lien" puis un coller, la copie du
lien est valide, et fonctionne avec ma macro, le seul truc c'est que qd
j'enregiste une macro au moment ou je fais ce copier coller, il
n'enregistre
qu'un copier coller normal, et si je rajoute ca dans la macro ci
dessous,

les liens sont tjrs invalides :(

quelqu'un voie ou je me suis trompé???

sub lien()
i = 1
Do While i < 20
Cells(i, 2).Value = ActiveSheet.Hyperlinks(Cells(i, 1).Value).Address
i = i + 1
Loop
End Sub

merci d'avance

@ plus
Elicend
________________________

Attention adresse e-mail :
inconicoAfreePOINTfr
A = @
POINT = .
________________________