Transformer un tableau

Bonjour

j'aimerai passer de ce tableau

Tableau 1

a ce tableau

Tableau 2

La colonne B du 2ème tableau est issue des lignes vertes du 1er.

En fait je voudrais affecter la ligne rouge en colonne A jusqu'à la ligne rouge suivante et la ligne verte en colonne B jusqu'à la ligne verte suivante... je sais pas si c'est clair...

j'ai besoin d'automatiser la chose car mes tableaux font des milliers de ligne...

Merci de votre aide

Bonjour,

plutôt que de nous mettre des photos dont on ne peut rien faire, mets-nous le fichier excel qui correspond à ces photos.

Voici le fichier

Merci d'avance

19classeur2.xlsx (41.05 Ko)

Bonjour,

solution via une macro

Sub aargh()
    Set ws = Sheets.Add
    With Sheets("feuil1")
        dl = .Cells(Rows.Count, 1).End(xlUp).Row
        For i = 1 To dl
            If .Cells(i, 2) = "" Then
                t = .Cells(i, 1)
                s = InStr(t, "Classe")

                If s <> 0 Then
                s1 = InStr(t, "juge")
                    c = Mid(t, s + 7, s1 - (s + 8))
                Else
                    r = t
                End If
            Else
                k = k + 1
                ws.Cells(k, 1) = r
                ws.Cells(k, 2) = c
                .Cells(i, 1).Resize(1, 10).Copy ws.Cells(k, 3)
            End If
        Next i
    End With
    With ws.Cells(1, 1).Resize(k, 12)
    .Borders.Weight = xlThin
    .EntireColumn.AutoFit
    End With
End Sub
18jpain.xlsm (72.28 Ko)

C'est parfait

merci Beaucoup

Rechercher des sujets similaires à "transformer tableau"