Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
612to616
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
612to616
612to616
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Macro für Excel Verkettung mit Zeilenumbruch

Macro für Excel Verkettung mit Zeilenumbruch
20.05.2005 11:43:54
Barbara
Hallo,
ich habe ein kleines Problem und vielleicht könnte mir einer behilflich sein. Im voraus schon mal vielen Dank.
Ich habe eine Excel-Tabelle mit 5 Spalten(A, B, C, D und E). Desweiteren hat die Tabelle 1200 Zeilen. Nun möchte ich, dass die 5 Spalten miteinander verkettet werden (was ja kein Problem ist) und in 6 Zeilen umgewandelt werden; und das für jede Zeile(dies ist mein Problem). In der Beispieltabelle ist zu sehen, was ich habe und was ich möchte.
https://www.herber.de/bbs/user/23003.xls
Danke. mfg spreisseline

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

Betreff
Datum
Anwender
Anzeige
AW: Macro für Excel Verkettung mit Zeilenumbruch
20.05.2005 11:58:33
bavariabob
Hi Barbara,
versuch folgendes:

Sub ZeilenKopieren()
a = [a1].CurrentRegion.Rows.Count
For b = 1 To a
Cells(a + 1, 1).Value = Cells(b, 1).Value
Cells(a + 2, 1).Value = Cells(b, 2).Value
Cells(a + 3, 1).Value = Cells(b, 5).Value
Cells(a + 4, 1).Value = Cells(b, 3).Value
Cells(a + 5, 1).Value = Cells(b, 4).Value
Cells(a + 6, 1).Value = Cells(b, 5).Value
a = a + 7
Next
End Sub

AW: Macro für Excel Verkettung mit Zeilenumbruch
20.05.2005 12:14:14
Barbara
Vielen Dank Bavariabob.
Es hat super funktioniert.
AW: Macro für Excel Verkettung mit Zeilenumbruch
20.05.2005 12:52:23
bavariabob
Barbara,
gern geschehen, freut mich ,dass es so funzt wie gewollt.
Vielen Dank für die Rückmeldung und ein schönes Wochenende!
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige