Matrix in Tabelle umwandeln
Alexander
ich hab eine Frage, die auf eine Antwort von Otto H in einem Beitrag von 2005 beruht. Hier der Link zum Forenthema: https://www.herber.de/forum/archiv/544to548/t546644.htm
Die Antwort hat mir sehr weitergeholfen, dennoch will ich eine Änderung an der VBA Formel vornehmen. Und zwar dass mir die VBA Formel eine Tabelle ausgibt die nach dieser Vorgehensweiße die Daten aus der Matrix nimmt:
y x z
1 1 11
1 2 12
1 3 13
1 4 14
2 1 21
2 2 22
................
................
Wie muss ich diese Formel umschreiben damit mir dieser Makro das macht?
Sub xyz()
Dim i As Long
Dim x As Integer
Dim y As Integer
Dim z As Integer
i = 5
For x = 1 To 4
For y = 1 To 5
Cells(i, 9) = Cells(4, x + 2)
Cells(i, 10) = Cells(y + 4, 2)
Cells(i, 11) = Cells(y + 4, x + 2)
i = i + 1
Next y
Next x
End Sub
Vielen Dank im Vorraus!
Grüße
Alex
Anzeige