Transformer une liste verticale en horizontale

Bonjour à tous,

Je ne trouve pas mon sujet très bien rédigé, alors je m'explique plus en détail :

J'ai des valeurs alpha de A1 à A5 et je voudrais toutes les regrouper (séparées par juste un espace) dans une seule case.

Je joins une photo de ce que j'ai et de ce que je souhaiterais.

Ça fait un moment que je me casse les dents là dessus et je n'ai pas trouvé mon bonheur dans google, c'est pour cela que je mets les velus à contribution

Merci et A+

Bonjour,

=CONCATENER(A1;" ";A2;" ";A3;" ";A4;" ";A5)

A+

Effectivement !

J'ai honte car je connais cette fonction mais elle ne m'était pas venue à l'esprit

Elle ne m'était pas venue à l'esprit sans doute pour une bonne raison :

La liste verticale est évolutive : régulièrement une valeur va disparaître et avec la fonction Concatener le résultat buggue quand il y a une suppression.

Est ce qu'il ne faudrait pas passer par INDEX ou RECHERCHE ou un truc comme ça ?

Merci et A+

Bonjour,

Une alternative VBA.

Faire ALT F11 pour visualiser le code.

Cdlt.

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Byte
    If Not Intersect(Target, [A1:A5]) Is Nothing Then
        If Target.Count > 1 Then Exit Sub
        [A10] = ""
        For i = 1 To 5
            If Not IsEmpty(Cells(i, 1)) Then [A10] = Trim([A10] & Chr(32) & Cells(i, 1))
        Next
    End If
End Sub

Bonjour,

Je sais que c'est sur une seule cellule mais si, tu veux faire sur plusieur cellules.

Lorsque je veux passer du verticale à l'horizontale ou inversement, j'utilise la fonction TRANSPOSE()

Qu'il faut valider avec Ctrl Maj Entrée

{=TRANSPOSE(A1:A9)}

A toute fin utile.

Cordialement,

Leakim

Merci pour le travail mais je n'arrive pas à le faire fonctionner...

J'abandonne le projet, trop compliqué pour moi

Merci et adieu