VBA Excel et Liens Hypertextes

Bonjour à tous.

J'aurai besoin d'aide pour établir une macro qui ferait la choses suivante :
- dans la colonne A, j'ai du texte avec des liens hypertextextes qui ne sont plus les bons
- dans la colonne B j'ai en texte les nouveaux liens à mettre à la place de ceux qui sont dans la colonne A

Comment faire ?

Merci d'avance.

bonjour

tu peux tester

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim Cell As Range 'Dim Texte As String   For Each Cell In Range("A1:A" & Range("A65536").End(xlUp).Row) 'option pour conserver le meme texte qui s'affiche dans la celule 'Texte = Cell.Hyperlinks(1).TextToDisplay   ActiveSheet.Hyperlinks.Add Anchor:=Cell, Address:=Cell.Offset(0, 1) 'Cell.Hyperlinks(1).TextToDisplay = Texte Next Cell

---

michel