Transposition de matrice 161 lignes

Bonjour et bonne année à tous

je cherche à transposer une matrice de donnée ligne par ligne pour ne former plus qu'une seule colonne (CF PJ)

Il doit y avoir une façon plus simple que de faire 161 copier-coller Pourriez vous m'aider à résoudre ce problème via power query ou en réalisant un script d'avance je vous remercie

bonjour,

solution via une macro

Sub aargh()
    t = Sheets("matrice départ").UsedRange
    ReDim res(1 To UBound(t, 1) * UBound(t, 2), 1 To 1)
    For i = LBound(t) To UBound(t)
        For j = LBound(t, 2) To UBound(t, 2)
            k = k + 1
            res(k, 1) = t(i, j)
        Next j
    Next i
    Sheets("format arrivée").Range("A1").Resize(k, 1) = res
End Sub

Bonjour le fil,

Une procédure qui se nomme "aargh", ça donne envie

On obtient le même résultat avec PowerQuery (sélectionner toutes les colonnes > Dépivoter les colonnes > Supprimer la première colonne)

Merci à tous les deux pour ces solutions ; je vais gagner beaucoup de temps grâce à vous

Bonjour à tous !

Avec Excel 365 (Insider ?) :

=DANSCOL('Matrice départ'!A1:AVF161)

La vie est belle... non ?