Fusionner données ligne entière en une cellule

[dormokos]

Bonjour,

Je suis depuis plusieurs heures à la recherche d'une formule magique:

J'ai une ligne (de col A à col FM) soit beaucoup de case...

J'aimerais regrouper les données de chacune de ces case (ce sont des codes postale) dans une seule cellule ET en les séparant d'une virgule. Vu le nombre de colonne, les fonction type &CAR(10)& ou &", "& ne peuvent pas etre utilisées. J'ai déjà testé! au bout d'un moment Excel me dit "formule trop grande"...

J'ai déjà trouvé une macro pour fusionner les cellules selectionnées dans une cellule mais les données ne sont pas séparées, donc ceci n'est pas du tout pratique.

Merci beaucoup de votre aide!

 

[camarchepas]

Re : Fusionner données ligne entière en une cellule

Bonjour,

Voici une solution que j'utilise en colonne, mais en ligne cela marche aussi

une formule pour la première case
et une autre à tirer pour les case suivante

a défaut ça marche et c'est rapide.

 

[hoerwind]

Re : Fusionner données ligne entière en une cellule

Bonjour et bienvenu sur le forum, salut camarchepas,

Sous les fonctions complémentaires Morefunc (à télécharger gratuitement sur le Net), Mconcat permet de répondre en tous points à ta demande.

 

[camarchepas]

Re : Fusionner données ligne entière en une cellule

Bonjour Hoerwind,

Cette méthode est géniale pour une utilisation personnelle, mais si l'on doit en faire une utilisation sur plusieurs postes et de plus en entreprise pas très satisfaisante.

 

[Efgé]

Re : Fusionner données ligne entière en une cellule

Bonjour dormokos, camarchepas, Salut hoerwind,
Une proposition par macro à adapter au vrai fichier ...
Cordialement

 

[dormokos]

Re : Fusionner données ligne entière en une cellule

Merci pour vos réponses,

camarchepas, ta technique est très rapide en effet et parfaite pour une ligne.

hoerwind, j'ai chercher Morefunc, mais apparement ce n'est pas compatible Mac...

Pour la macro, je ne comprend pas ce que je dois faire, je ne vois rien en ouvrant le fichier excel...

J'essai d'appliquer ceci pour trois lignes, je continue de chercher

 

[Efgé]

Re : Fusionner données ligne entière en une cellule

Re
D'après ce que j'ai compris, sur Mac pas de macros 😡, donc pas de MoreFunc ni de ma proposition.
Désolé.
Cordialement

 

[dormokos]

Re : Fusionner données ligne entière en une cellule

Si, sur Mac j'arrive à faire des Macro.

Nous avons Microsoft Office 2004 pour Mac

Cordialement

 

[Efgé]

Re : Fusionner données ligne entière en une cellule

Re
Dans ce cas, voici le code (pour un bouton boite à outils Contrôles), si ça peut t'aider.

Private Sub CommandButton1_Click()
With Sheets("feuil1")
    For i = 1 To .Range("A" & Application.Rows.Count).End(xlUp).Row
        For j = 1 To 169
            Var = Var & .Cells(i, j) & ","
        Next j
        .Cells(i, 170) = Var
        Var = ""
    Next i
End With
End Sub

Cordialement

 

[dormokos]

Re : Fusionner données ligne entière en une cellule

Merci mais ça n'a pas l'air de marcher...

On m'a donné une autre macro qui marche,

Merci pour votre aide!