RESOLU / 800 lignes brutes a transformer en liens URL

  • Initiateur de la discussion Initiateur de la discussion yaya73
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Y

yaya73

Guest
bonjour,

dans un fichier excel j'ai a peu pres 800 lignes brutes comme celle-ci allant de 1 a 800

Ce lien n'existe plus
Ce lien n'existe plus
Ce lien n'existe plus
Ce lien n'existe plus
Ce lien n'existe plus
Ce lien n'existe plus
http://www.xxxxxxxx.com/pataire_details.asp?id_mandataire=7
http://www.xxxxxxxx.com/pataire_details.asp?id_mandataire=8
http://www.xxxxxxxx.com/pataire_details.asp?id_mandataire=9
http://www.xxxxxxxx.com/pataire_details.asp?id_mandataire=10
http://www.xxxxxxxx.com/pataire_details.asp?id_mandataire=11



je souhaiterais intégrer automatiquement un lien url sur chacune d'elle afin de cliquer sur ces liens et basculer directement sur une page web.

Quelle peut être ma démarche a faire s'il vous plait ?

Merci
 
Dernière modification par un modérateur:
Re : 800 lignes brutes a transformer en liens URL

Bonjour, yaya73, le Forum,

Une possibilité avec cette macro :

Code:
Sub Liens_activer()
'Adaptation d'un code de BOISGONTIER (merci !)
Dim val As Range
'si les données se trouvent en colonne A
For Each val In Range("a2:a10000")
If val <> "" Then
ActiveSheet.Hyperlinks.Add Anchor:=Range(val.Address), Address:=val.Value
End If
Next
End Sub

A bientôt 🙂
 
Re : 800 lignes brutes a transformer en liens URL

Bonjour,
et merci pour votre réponse 🙂
Cependant étant une"quiche en VB" je n'ai pas réussi a le faire fonctionner........... ouuuuuuuuh

Si éventuellement vous pouviez regarder 1 minute le fichier, ca serait superbe.

merci a vous
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Retour