Liens dupliquer

[DoubleZero]

Bonjour à toutes et à tous,

En colonne A sont copiées des adresses Internet.

En colonne B, pour des raisons pratiques, un descriptif sommaire de chaque lien est saisi.

Or, mes tentatives de dupliquer les liens de A sur B sont stériles 🙁.

Je vous remercie pour la peine et le temps qu’il vous sera permis de m’accorder afin de m'aider.

A bientôt 🙂.

 

[Paritec]

Re : Liens dupliquer

bonjour 00 le forum
voilà j'ai supprimé les liens en colonne A
a+
papou🙂

 

[DoubleZero]

Re : Liens dupliquer

Re-bonjour,

Merci beaucoup, Papou 😀, pour ton aide.

Visiblement, j’ai manqué de précision 😱.

Je souhaiterais que chaque lien présent dans les cellules de la colonne A soit reporté sur chaque "résumé" inscrit en colonne B.

Encore merci 🙂.

 

[pierrejean]

Re : Liens dupliquer

Bonjour 00

Salut Paritec

Teste ceci:

Sub modif()
For Each c In Range("A2", [A65000].End(xlUp))
 c.Hyperlinks(1).TextToDisplay = c.Offset(0, 1)
Next
End Sub

et il te restera a supprimer la colonne B

 

[DoubleZero]

Re : Liens dupliquer

Re-bonjour,

Merci beaucoup, pierrejean 😀, pour ton aide : c’est exactement ce que je souhaitais pour un confort visuel.

Toutefois, je ne voudrais pas perdre les données originales de la colonne A et ne parviens pas à modifier ton code en conséquence.

Si ce que je sollicite est impossible ou difficile à réaliser, je m’arrangerai autrement en dupliquant, par exemple, la colonne A avant que la macro n’agisse pour transformer la chenille en papillon sur la colonne B 🙂.

 

[pierrejean]

Re : Liens dupliquer

Re

Voila

Sub modif()
Columns("A").Insert
Columns("B").Copy Destination:=Range("A1")
For Each c In Range("B2", [B65000].End(xlUp))
 c.Hyperlinks(1).TextToDisplay = c.Offset(0, 1)
Next
Columns("A").ColumnWidth = 0
End Sub

Note que la macro ne fait rien d'autre que ce que tu as decrit

 

[DoubleZero]

Re : Liens dupliquer

Re-bonjour,

Superbe ! 1000 et 1 fois MERCI, pierrejean 😀,

... Note que la macro ne fait rien d'autre que ce que tu as decrit

Oui, je m'en rends compte et j'ai honte. Mais je pensais que le report des liens pouvait se faire sans affecter la colonne A ou la colonne B 😱.

Merci encore et à bientôt 🙂.