Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Bestimmte Zeilen mittels Schleife kopieren

Bestimmte Zeilen mittels Schleife kopieren
17.01.2006 12:40:46
Torstenb
Vielleicht hat Jemand eine Schnelle Lösung. Ich habe eine Arbeitsmappe mit sehr vielen Werten drin.
Ich möchte mittels einer Schleife die gesamte Tabelle durchgehen und eine Zeile in eine andere Tabelle kopieren, die nächsten 3 Zeilen überspringen, dann die nächste wieder in die andere Tabelle darunter kopieren usw. So bis zum Schluss. Ich habe dann also in der neuen Tabelle untereinander nur jede 4. Zeile aus der Original-Tabelle.
Danke schon mal im voraus!
Torsten
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bestimmte Zeilen mittels Schleife kopieren
ransi
Hallo thorsten
versuch mal:


Option Explicit
Public Sub t()
Dim letzteblatt1 As Long
Dim letzteblatt2 As Range
Dim L As Long
letzteblatt1 = Range("A65536").End(xlUp).Row
For L = 1 To letzteblatt1 Step 4
    Set letzteblatt2 = Sheets("Tabelle2").Range("A65536").End(xlUp).Offset(1, 0)
    Rows(L).Copy letzteblatt2
Next
End Sub


ransi
Anzeige
AW: Bestimmte Zeilen mittels Schleife kopieren
17.01.2006 14:33:12
Torstenb
Vielen Dank ransi!
Funktioniert prima!
Torsten
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige