creation de lien hypertexte dans excel en vb

bonjour,
j'essaie de creer automatiquement dans une cellule un lien hypertexte correspondant a l'adresse de la cellule voisine (exemple adresse en A1 et lien à creer automatique en A2) .
Excell 2000 et VB6

probleme je n'arrive pas à le coder pour qu'il prenne les adresses de toute une colonne.

si qq'un avait un bout de code ou une idée.

merci d'avance.

bonjour

tu pourrais adapter ce type de procédure

Code:

---

1 2 3 4 5 6 7 8

Dim Cell As Range Dim x As Integer   x = Worksheets(1).Range("A65536").End(xlUp).Row   For Each Cell In Worksheets(1).Range("A1:A" & x) Worksheets(1).Hyperlinks.Add Cell.Offset(0, 1), Cell Next Cell

---

michel

merci pour ce code mais en fait il suffit de mettre dans la cellule excell
=LIEN_HYPERTExte(adresse,nom) et voila le tour est joué.

merci quan meme pour ta reponse.