Bouger une matrice

Bonjour, j'ai un petit problème de logistique. J'ai une matrice de 300 colonnes qui sont toutes de longueurs différentes. Je vais vous illustrer ce que j'aimerais faire, avec une matrice de 4 colonnes par exemple :

J'ai ceci :

1 1 1

2 2 2

3 3 3

4 4 4

5 5

6

7

8

et j'aimerais obtenir ceci :

1

2

3

1 4

2 1 5

3 2 6

4 3 7

5 4 8

donc que les données gardent leur même ordre dans chaque colonne, mais que les colonnes débutent du bas et terminent vers le haut. Quelqu'un a une idée? Merci de votre aide!


Le forum bug, et mélange les chiffres du 2e tableau je ne sais trop pourquoi. Mais en gros je veux que les séries de données commencent du bas vers le haut, tout en gardant leur ordre initial

Bonjour,

une proposition via une macro

Sub alignebas()
    dl = Cells.Find("*", , xlValues, , xlByRows, xlPrevious).Row
    dc = Cells(1, Columns.Count).End(xlToLeft).Column
    For j = 1 To dc
        dlj = Cells(Rows.Count, j).End(xlUp).Row
        Range(Cells(1, j), Cells(dlj, j)).Cut Cells(dl - dlj + 1, j)
    Next j
End Sub

wow, ça fonctionne à merveille, merci beaucoup c'est très apprécié!

Rechercher des sujets similaires à "bouger matrice"