Concaténation

kingfadhel

XLDnaute Impliqué
Bonjour tous le monde,
je suis nouveau dans le forum, j'ai un petit probleme et j'éspère lui trouvé une solution.
j'ai une liste de données repartie sur plusieurs lignes
et j'aimerai les concatenées dans une seule cellule avec une séparation genre (- ou ; ou : ou /)
exemple de données
en A1 : 2345
en A2 : 2567
.
.
.
.
en A145 : 3456

merci d'avance
rq: je voudrai un code ou une formule (sans pièces jointes, je me connecte via un proxy qui n'autorise pas le telechargement)
 

JNP

XLDnaute Barbatruc
Re : Concaténation

Bonjour le fil :),
Avec une fonction personnalisée
Code:
Function MaConcaténation(Plage As Range, Séparateur As String) As String
Application.Volatile
Dim Cellule As Range
For Each Cellule In Plage
MaConcaténation = MaConcaténation & Séparateur & Cellule
Next
MaConcaténation = Right(MaConcaténation, Len(MaConcaténation) - Len(Séparateur))
End Function
et dans la cellule
Code:
=MaConcaténation(A1:A145;"-")
Bonne journée :cool:
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 493
Messages
2 088 956
Membres
103 989
dernier inscrit
jralonso