Automatiser une formule concatener

Bonjour,

je joint un fichier à titre d'exemple. Il faut concatener les informations des cellule de la colonne A avec soit les cellules des colonnes F, G ou H, cela dépend si il y a une info dans la cellule

Je le fait à la main, j'ai commencer un exemple en colonne K , au final ça me donne les informations en feuille 2. Mais c'est long notamment avec le fait qu'il y a de nombreuses lignes et en plus il faut scroller car il y a forcement un décalage

j'essaye de trouver une solution pour automatiser, mais j'ai pas trop d'idée

le but c'est donc d'automatiser le processus pour passer directement de la feuille 1 à la feuille 2

Merci d'avance,

Cordialement

bonjour,

unr solution via une macro

Sub aargh()
    Dim tr(1 To 100000, 1 To 1) ' si plus de 100000 references possibles augmenter ce nombre
    With Sheets("sheet1")
        dl = .Cells(Rows.Count, 1).End(xlUp).Row
        t = .Range("A1").Resize(dl, 8)
    End With
    r = 0
    For i = 1 To dl
        For j = 6 To 8
            If t(i, j) <> "" Then
                r = r + 1
                tr(r, 1) = t(i, 1) & t(i, j)
            End If
        Next j
    Next i
    Sheets("sheet2").Range("A1").Resize(r, 1) = tr
End Sub

Bonjour,

excellent ! j'apprécie aussi le nom de la macro ^^

je garde, merci beaucoup

Cordialement

Bonjour,

En complément sans macro par formule :

=SI(F1<>"";CONCATENER(A1;F1);SI(G1<>"";CONCATENER(A1;G1);CONCATENER(A1;H1)))