Pouvoir coller dans une cellule <a href="http://xxxxx/" target="blank">yyyyy</a>

bbvtec

XLDnaute Nouveau
Bonjour à tous,

J'aimerais dans toutes les cellules de la colonne "A" avoir <a href="http://xxxxx/" target="blank">yyyyy</a> , que les "X" soient remplacés par l'adresse d'un site ce trouvent dans les cellules de la colonne "B" et les "Y" soient remplacés par un texte ce trouvent dans les cellules de la colonne "C".

C'est donc juste pour automatiser les copier/coller qu'il faudrait que je fasse sur +ou- 100 lignes.

Une fois ceci fait j'enregistre mon fichier en .CSV pour l'importer dans une BDD.

Merci par avance.
Ben.
 

Paf

XLDnaute Barbatruc
Re : Pouvoir coller dans une cellule <a href="http://xxxxx/" target="blank">yyyyy</a>

Bonjour,


en A1: ="<a href=""http://" & B1 & "/"" target=""blank"">" & C1 & "</a>"
puis tirer vers le bas

ou un essai macro

Code:
Sub LaMacro()
 Dim i As Integer
 For i = 1 To Range("B" & Rows.Count).End(xlUp).Row
    Cells(i, 1) = "<a href=""http://" & Cells(i, 2) & "/"" target=""blank"">" & Cells(i, 3) & "</a>"
 Next
End Sub

A+
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 837
Messages
2 092 660
Membres
105 482
dernier inscrit
Eric.FKF