Informationen aus einer Spalte in eine Matrix

Computer: Software & Programmierung Office Software
1

Hallo liebe Mitglieder,

ich habe folgende Problem:
Meinen Daten befinden sich in einer Excelspalte A1 bis A1000, die Informationen wiederholen sich nach jeder 6-ten Zeile. Ich würde gerne folgendes ausgeben:
A1 A2 A3 A4 A5 A6
A7 A8 A9 A10 A11 A12
A13 A14 A15 A16 A17 A18
usw.

Mit transponieren komme ich nicht hin. BItte um Hilfe.

Danke im voraus,

2

Hallo,

versuche es mal mit folgendem Code:

Sub test()
zl = 1
sp = 3
For i = 1 To 1000
Cells(zl, sp).Value = Cells(i, 1).Value
sp = sp + 1
If sp = 9 Then
sp = 3
zl = zl + 1
End If
Next
End Sub

Gruß
Natator

3

Hallo Natator

Danke für die schnelle Hilfe. Hat funktioniert.
Gruß,

4

Hallo,
wenn die Daten von A1:A999 stehen, folgende Formeln jeweils in die Zellen schreiben:

C1: „=INDEX($A$1:blush:A$999;1+6*(ZELLE(„zeile“;C1)-1))“
D1: „=INDEX($A$1:blush:A$999;2+6*(ZELLE(„zeile“;D1)-1))“
E1: "=INDEX($A$1:blush:A$999;3+6*(ZELLE(„zeile“;E1)-1))
…
C2: „=INDEX($A$1:blush:A$999;1+6*(ZELLE(„zeile“;C2)-1))“
D2: „=INDEX($A$1:blush:A$999;2+6*(ZELLE(„zeile“;D2)-1))“

usw.