Concaténation de plusieurs cellules en une seule

Salut à toutes et tous,

Je voudrais en vba, concaténer les cellules de A à N dans les cellules de la colonne AJ .  c'est à dire les cellules des colonnes A jusqu'à N de la même ligne doivent se concaténer dans la colonne AJ toujours de la même ligne. Et ça à partir de la ligne 5 de mon fichier excel.
Comment faire s.v.p.?
Merci ! 

Salut,

doits tu rajouter un separateur entre les chaines (espace, virgule, autre) ?

si non une formule copier dans chaque cellule de la colonne aj fera l'affaire et sera plus rapide. Au pire utilise une macro pour copier la formule.

la formule:

=CONCATENER(A1,B1,C1,D1,E1,F1,G1,H1,I1,J1,K1,L1,M1,N1)

A+

Merci pour ta réponse.
Peu importe virgule, espace ou autre. Pour fixer, je vais dire espace.
Et il me faut une macro vba et non la formule car ça c'est une partie d'une grande macro que je fais.

...

combien de ligne a concatener dans ton tableau ?

Il y en a pas mal, je n'arriverai à les chiffrer

...

avec ce genre de reponse je sent que l'on vas avancer vite !

En fait tu sais quoi ? non !... bah je viens de poser 2 questions juste pour voir si tu avais envie d'y mettre du tien dans ton probleme et la maintenant je suis sure que tu cherches surtout quelqu'un pour faire ton boulot !

Franchement c'est super simple comme code donc essais et revient me voir... ou attend un encore un peu il y aura peut etre une ame plus charitable que moi

A+


 

Si j'ai posé la question dans un forum, c'est que j'ai déjà essayé et j'ai pas réussi à le faire.
J'arrive à le faire juste pour une seule ligne, j'ai pas su comment le faire sur tout mon fichier.
Voici mon code appliquer sur la ligne 14 et 36 c'est la colonne AJ où je dois concaténer les autres cellules de ma ligne:

            NoLigne = 14
            Cells(NoLigne, 36) = ""
            For i = 1 To 14
            Cells(NoLigne, 36) = Cells(NoLigne, 36) & Cells(NoLigne, i) & " "
            Next
            Cells(NoLigne, 36) = RTrim(Cells(NoLigne, 36))

Il ne faut pas prendre les gens pour des cons.

Salut

J'ai ce code, j'espère que ca correspond à ce que tu souhaites

Sub Bouton2_QuandClic()
    Dim i As Integer
    Dim j As Integer
    Const maxcol As Integer = 5
    Const col As Integer = 10
   
    i = 1
    j = 1
    Feuil1.Cells(i, 10) = ""
   
    Do While Feuil1.Cells(i, j) <> ""
        Feuil1.Cells(i, 10) = ""
        For j = 1 To maxcol
            Feuil1.Cells(i, 10) = Feuil1.Cells(i, 10) & " " & Feuil1.Cells(i, j)
        Next
        i = i + 1
        j = 1
    Loop
End Sub


Bon courage

...

Il ne faut pas prendre les gens pour des cons.

extrait du reglement que tu as accepté :

• On demande une explication ou de l'aide sur un sujet précis,on ne l'exige pas!
  N'oubliez pas que vous vous adressez à des membres bénévoles qui vont partager de leur temps et leurs connaissances afin de vous aider Vous vous devez de garder cet esprit communautaire en tête ;-)
• On pose une question aussi précise que possible.
  Répondre prend parfois beaucoup de temps. inutile d'en ajouter par des échanges n'étant que des reformulations. relisez-vous...
• On précise les détails du problème : contexte, langage, message d'erreur, etc.
• On pense à donner le bout de code qui pose problème et à préciser le langage utilisé.
  C# n'est pas C++, VBA n'est pas VB6, etc... vérifiez le thème où vous postez.
• On ne demande pas un programme tout fait, on ne demande que de l'aide sur un problème concret.
  Dirigez-vous directement dans la recherche de sources pour les programmes complets. Inutile de demander du "code tout cuit", vous n'obtiendrez aucune réponse.

Pour la version complete c'est ici : Voir le règlement de CodeS-SourceS

salut bigfish_le vrai,

c'est les USA qui te font oublier notre langue?
notre ami a dit (ou a voulu dire ) :
Il ne faut pas prendre les cons pour des gens.

voilà pour te rassurer


mariafan -> pour le moment, personne ne t'a pris pour un con. il serait juste bienvenu que tu expliques "en une seule fois" (trop tard) clairement ton problème. çà serait un gain de temps pour tout le monde


je ne fais pas de VBA
partant de là je vais te montrer comment je comprends ta question


Je voudrais en vba, concaténer les cellules de A à N dans les cellules de la colonne AJ . 
ok VBA çà peut être ACCESS mais "cellules", je suppose EXCEL.
les cellules de A à N, la cellule A n'existe pas, A une colonne. il veut sans doute parler des cellules d'une ligne en particulier, non précisée.

c'est à dire les cellules des colonnes A jusqu'à N de la même ligne doivent se concaténer dans la colonne AJ toujours de la même ligne.
OK c'est bien ce qui me semblait. bon on ne sait toujours pas la ligne mais c'est un début.
par contre la colonne AJ pour moi çà ne veut rien dire, j'ai sûrement A3 et J8 mais AJ...., 1 colonne + 1 colonne <> 1 colonne
pas grave, il va peut-être préciser après

Et ça à partir de la ligne 5 de mon fichier excel.
OK c'est bien EXCEL et il veut çà sur la ligne 5.
mais çà quoi?
concaténer les cellules de la ligne 5 des colonnes A à N en exceptant les A et J?
ok encore un sujet trop clair...


conclusion (que je me dis UNIQUEMENT à moi même)
il ne m'aide pas à l'aider, j'vais peut-être pas non plus le forcer quand même...

---

Prenez un instant pour répondre à ce sondage svp