Tabellenkalkulation

Excel - Automatisch Zeilen in Spalte verschieben

Diskussionsgruppen
Betriebsysteme: Windows 7; WindowsVista; WindowsXP; Linux; BS-Sonstige
Software: Textverarbeitung; Tabellenkalkulation; Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; E-Mail/Outlook; Internet Browser; SW-Sonstige
Hardware: Mainboard/CPU/RAM; Grafikkarten; Peripherie; HW Sonstiges
Netzwerk: DSL; W-Lan; Telekommunikation; NW-Sonstiges
Programmierung: Skripte(PHP,ASP,Perl...); Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke

Frage

Ich habe eine recht lange Excel Datei in welcher sich von Zeile zu Zeile Text und Datum abwechselt. Das Ganze ist eine Liste von SMS die ich erhalten habe. Nun würde ich gerne Datum und Text in jeweils eine Spalte ziehen. Wie kann man sowas automatisieren. Konkret soll das so aussehen: A1 bleibt A1 A2 wird zu B1 A3 wird zu A2 A4 wird zu B2 A5 wird zu A3 A6 wird zu B3 ...usw... Vielen Dank im Voraus!

Antwort 1 von Hajo_Zi

Hallo Nick,

Bereich markiueren, kopieren, Zielzelle wählen, rechte Maustaste, Inmhalte einfügen, Transponieren.

Gruß Hajo

Antwort 2 von nomatic

Damit ist mir leider nicht geholfen.

Wie gesagt:

A1 bleibt A1
A2 wird zu B1
A3 wird zu A2
A4 wird zu B2
A5 wird zu A3
A6 wird zu B3
...usw...

Durch das Transponieren sieht das so aus:

A1 bleibt A1
A2 wird zu B1
A3 wird zu C1
A4 wird zu D1
A5 wird zu E1
A6 wird zu F1
...

Antwort 3 von Saarbauer

hallo,

dein Problem ist nur per Makro zu lösen, versuch es mal hiermit

Sub umsortieren()
    For i = 2 To Range("A65536").End(xlUp).Row Step 2
        Range("B" & i - 1).Value = Range("A" & i).Value
        Range("A" & i).Value = ""
    Next i
    Columns("A:B").Select
    Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
End Sub

Gruß

Helmut

Antwort 4 von nomatic

Hammer... genauso sollte das sein :)

Vielen Dank dafür!

Kannst du mir eine gute Quelle nennen wo man dieses skripten zummindest in den Grundlagen lernen kann?
Hab desöfteren kleinere Probleme die nur mit Makros zu lösen sind und will dann nicht immer wen fragen, sondern mal selber machen.

Hab das Wikibook "VBA in Excel -Grundlagen" gelesen aber von Grundlagen sehe ich dort nichts.

Antwort 5 von Saarbauer

hallo,

mit einem Buch kann ich dir nicht dienen, ich habe es im Laufe der Zeit mit Learning by Doing gelernt.

Ein Teil des Makros habe ich auch augezeichnet, da das schneller geht.

Gruß

Helmut