Concatener plusieurs lignes
Bonjour,
J'ai un ficher excel qui comporte 79 colonnes et pres de 900 lignes.
Je voudrais concaténer toutes les valeurs d'une lignes , c'est a dire de A1 : A79 dans une cellules.Quelle formule puis-je utiliser?
Merci de m'aider
Voir fichier joint ...
Bonjour Greg
As tu réellement des lignes vides pour la colonne A ?
Si j'ai bien compris tu souhaites concaténer les 79 colonnes pour chaque ligne y compris si la cellule est vide ?
Bonjour,
Je souhaite concatener les 79 colonnes pour la lignes y meme si il y a des lignes vides cest une probleme.
greg6fr a écrit :Bonjour,
J'ai un ficher excel qui comporte 79 colonnes et pres de 900 lignes.
Je voudrais concaténer toutes les valeurs d'une lignes , c'est a dire de A1 : A79 dans une cellules.Quelle formule puis-je utiliser?
Merci de m'aider
Voir fichier joint ...
Bonsoir
Une piste pour t'aiguiller :
Ici je prends la colonne B1 à B40 (nb_ligne) defini
Je concatene pour la premiere ligne de B1 à 79 colonnes à droite (defini dans nb colonne)
J'affiche le résultat en A1
Sub test()
Nb_colonne = 79 ' nb de colonne à droite
Nb_ligne = 40 ' nb de lignes à traiter
For Each c In Range("B1:B" & Nb_ligne) ' je défini la première colonne des données à concaténer
concat = c.Value
For i = 1 To Nb_colonne
concat = concat & c.Offset(0, i)
Next
ligne = c.Row
Range("A" & ligne).Value = concat ' colonne qui affichera le resultat ( ici colonne A)
Next
End SubCdt,
Bonjour,
utiliser la fonction de feuille de calculs INDEX pour extraire une ligne de données
à combiner avec la fonction VBA Join pour effectuer la concaténation …