Macro Excel : extraire URL / Lien d’une cellule

par Aurélien Bardon

12 novembre 2021
Classé dans : Developpement

Si dans la feuil1, colonne A, il y a 20 lignes contenant 1 texte qui est un lien (ex : Ceci est un lien)et qu’on souhaite extraire les URL dans la colonne B,

alors voici la macro parfaite

Sub URL()
Dim c As Range
For Each c In Sheets("Feuil1").Range("A1:A20").Cells
c.Offset(0, 1).Value = c.Hyperlinks(1).Address
Next
End Sub

Aller dans Affichage => Macro => Afficher les Macro => Créer une Macro

copier / coller

Puis cliquer sur Exécution

et la magie commence 😀

Aurélien Bardon
Dites STOP aux régressions SEO avec Oseox

Je vous recommande de lire également

  • Prompt Engineer
  • Marketez le marketeur !
  • On ne voit pas ce qu’on ne monitore pas & Eat your own dog food
  • Ce qu’a apporté la mondialisation et le capitalisme
  • Tu es de droite ou tu es de gauche ?

    • Ne manquez pas la newsletter pro E-marketing d'Oseox.fr

    (Un ebook de 31 pages en cadeau)