Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
112to116
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
112to116
112to116
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Spalten untereinander darstellen

Spalten untereinander darstellen
11.04.2002 10:54:00
CS
Hallo!

Ich habe eine Tabelle mit 31 Spalten (31 Tage!) nebeneinander, jede Spalte hat 96 Zeilen. Ich möchte nun alle Werte aus den Spalten untereinander stehen haben, d.h. 31 x 96 = 2976 Werte untereinander. Dabei sollen die Werte aus Spalte 2 in der ursprünglichen Reihenfolge unter den Werten der Spalte 1 stehen (Letzter Wert aus Spalte 2 wird 192. Wert in Spalte 1.) Spalte 3 soll unter Spalte 2 stehen usw.

Wie kann ich das realisieren?

Vielen Dank für Lösungsvorschläge!

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Spalten untereinander darstellen
11.04.2002 11:13:27
Hans-Jörg
am einfachsten so:
Markiere die 96 Werte der Sp B Rechte Maustaste >Ausschneiden
gehe auf die gewünschte Zelle der Sp A - Rechte Maustaste > Inhalte einfügen
Dann Haken bei Transponieren setzen.
Wenn du einen VBA-Code brauchst aktiviere vorher den Makrorecorder.
Hans-Jörg
Re: Spalten untereinander darstellen
11.04.2002 11:14:18
Peter H. Erdmann
Hallo

Sub Spalten_Kopieren()
Zähler2 = 97
For Zähler1 = 2 To 31
Range(Cells(1, Zähler1), Cells(96, Zähler1)).Cut
Cells(Zähler2, 1).Select
ActiveSheet.Paste
Zähler2 = Zähler2 + 96
Next Zähler1
End Sub

Gruß aus dem Land der Bayern
Peter

Re: Spalten untereinander darstellen
11.04.2002 14:24:36
CS
Hallo Peter!

Funktioniert prima! Vielen Dank!

Gruß CS

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige