Concatener....

Fermé
missod - 1 févr. 2013 à 18:18
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 - 2 févr. 2013 à 11:27
Bonjour,


Dan un tableau EXCEL, j'ai des valeurs alpha numériques dans les cellules A1 à A9 (de type : A1= A363; A2=A368; A3=A595, A4= A544,etc...). Je voudrais concaténer ces valeurs dans une seule cellule pour les retrouver sous la forme "A363;A368;A595;A544"

J'arrive à concaténer A1 et A2, puis le résultat avec A3, puis le résultat avec A4, etc. mais comment faire pour concaténer A1 à A9 en 1 seule ligne de commande?

Merci!

2 réponses

Vaucluse Messages postés 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 419
Modifié par Vaucluse le 1/02/2013 à 18:25
Bonjour
=A1&";"&A2&";"&A3&";"&A4&";"&A5&";"&A6 etc.....
crdlmnt

Ps ou encore:
=CONCATENER (A1;";";B1;";";C1;";";......

Errare humanum est, perseverare diabolicum
0
Merci, mais je voulais justement éviter de lister tous les arguments, en saisissant une commande qui me permette d'avoir ce résultat de A1 àA9 sans les énumérer tous.

Merci quand même!
0
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 249
2 févr. 2013 à 11:27
Bonjour,

avec une fonction personnalisée en VBA :
Function concatPlage(plage As Range, separateur As String) As String
    Dim c As Range
    For Each c In plage
        concatPlage = concatPlage & separateur & c.Text
    Next c
    If Len(concatPlage) > 0 Then concatPlage = Mid(concatPlage, Len(separateur) + 1)
End Function

https://www.cjoint.com/?CBclBauV7DK

Eric
0