Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

concaténer plusieurs cellules(nombre inconnu)

1 réponse
Avatar
Francis B
Bonjour à tous,
Je cherche à concaténer plusieurs cellules, mais le nombre de cellules peut
être variable (c'est le resultat d'une extraction).
Si quelqu'un a une méthode (avec ou sans VB), je suis preneur.

Merci d'avance
Francis B

1 réponse

Avatar
FFO
Salut à toi
En supposant que tes données débutent en A1
Je te propose ce code :

For i = 1 To Range("A65535").End(xlUp).Row
For j = 1 To Range("IV1").End(xlToLeft).Column
Données = Données & Cells(i, j)
Next
Next
Sheets("Feuil2").Range("A1") = Données

Résultat celle A1 de la feuille2

Celà devrait te convenir
Dis moi !!!