Hallo,

deine Angaben sind etwas mager, aber ich vermute, dass deine Werte jeweils in einer extra Zeile stehen. Ist die Leerzeile in regelmässigen Abständen oder unregelmässig?

Ist bestimmt mit VBA zu lösen

Gruß

Helmut

is alles regelmäßig, also eigentlich genau wie da oben gezeigt

"Ist bestimmt mit VBA zu lösen"

müsstest mir nur sagen wie^^, eigentlich müsste man die prozdur bei einem zahlenblock als makro aufzeichen und dann irgendwie ne endlosschleife einbaun :/ , aba ich hab vom proggen keine ahnung

Hi,

versuche es mal mit diesem Code

Sub transponieren()
    Dim loLetzte As Long
    Dim loZaehler As Long
    Dim loZeile As Long
    loLetzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)
    loZaehler = 1
    loZeile = 1
    Do While loZaehler <= loLetzte
        Cells(loZeile, 1) = Cells(loZaehler, 1)
        Cells(loZeile, 2) = Cells(loZaehler + 3, 1)
        Cells(loZeile, 3) = Cells(loZaehler + 6, 1)
        Cells(loZeile + 1, 1) = Cells(loZaehler + 1, 1)
        Cells(loZeile + 1, 2) = Cells(loZaehler + 4, 1)
        Cells(loZeile + 1, 3) = Cells(loZaehler + 7, 1)
        loZaehler = loZaehler + 9
        loZeile = loZeile + 2
    Loop
End Sub

Bis später,
Karin

hmm... also mit 12 34 56 funktioniert das, daraus wird dann
ABC
135
246
sobald man aba mehr zahlen in der spalte hat wie 12 34 56 78
kriegt man sowas raus
ABC
135
246
7
8
4

wenn der zahlenblock mehr als aus 2 zahlen besteht siehts ähnlich wirr aus

Hi,

ich habe getestet

1
2

3
4

5
6

7
8

9
10

11
12

13
14

15
16

17
18

19
20

21
22

23
24

mit dem Ergebnis

1 3 5
2 4 6
7 9 11
8 10 12
13 15 17
14 16 18
19 21 23
20 22 24
Das entspricht deiner Vorgabe.

Zitat aus deinem letzten Beitrag:

Davon war nicht die Rede. Zitat aus deinem Beitrag 09.04.2007, 12:55:

In deinem Eröffnungsbeitrag gab es nur Blöcke aus 2 Zellen! Was glaubst du, weshalb Helmut nachgefragt hat? Wenn man eine Aufgabe stellt, dann sollte man sie schon richtig beschreiben. Andernfalls macht sich der Helfer Arbeit, die dann im Papierkorb landet. Dafür habe ich keine Zeit, sondern helfe lieber anderen Fragestellen.

Bis später,
Karin

okay okay mein fehler :(
zu dem was du getestet hast, ich wollte aba für jeden zahlenblock ein spalte

"ich möchte jez diese zahlenpakete alle separat in einer eigenen spalte haben" -- aus meinem ersten beitrag

sry ;(

hmm vll. hilft mir ja doch noch wer, dachte man könnte sowas allgemein proggen für alle fälle dieser art also:
Ich hab eine spalte A bestehend aus 2088 zeilen, In dieser spalte hab ich zahlen blöcke die 57 zahlen +am ende eine leerzeile enthalten, also ein 58 zellen block. Bei 2088 zeilen sind das also 36 von diesen blöcken. Ich will das jeder dieser blöcke eine eigene spalte kriegt, sodass ich am ende 36 spalten hab mit je 57 zahlen (und am ende einer leerzeile)