CONVERTIR MATRIZ

hola, Claudio !

suponiendo tu matriz original en el rango 'A1:E4' [incluyendo los titulos
en la fila 1]...
y que la segunda matriz la requieres en el rango 'G2:I8' [incluyendo los
titulos en la fila 1]...
prueba con una macro +/- como la siguiente: [suponiendo que los valores
son 'constantes' y NO 'formulas'] -?-

Sub Por_articulo()
Dim Fila As Integer, Sig As Integer, Celda As Range
With Range("g2")
For Fila = 2 To Range("a" & Rows.Count).End(xlUp).Row
For Each Celda In Range("a" & Fila).Offset(, 1).Resize(,
4).SpecialCells(xlCellTypeConstants)
.Offset(Sig) = Range("a" & Fila)
.Offset(Sig, 1) = Cells(1, Celda.Column)
.Offset(Sig, 2) = Celda
Sig = Sig + 1
Next
Next
End With
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

... es posible pasar la informacion de una matriz del tipo:
FACTURA AH2001 AH2036 AH2148 AH3012
1 1 5
2 1 2 4
3 4 1
A una lista del tipo :
FACTURA ARTICULO CANTIDAD
1 AH2001 1
1 AH2148 5
2 AH2001 1
2 AH2036 2
2 AH3012 4
3 AH2036 4
3 AH2148 1