Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Jede 10. Zeile aus einer Spalte übernehmen

Forumthread: Jede 10. Zeile aus einer Spalte übernehmen

Jede 10. Zeile aus einer Spalte übernehmen
16.09.2003 00:08:12
Robert
Ich möchte aus einem Tabellenblatt "Tab01" aus der Spalte H die Werte aus den Zeilen 10;20;30 ... (also jede 10. Zeile) in das Tabellenblatt "Tab02" in die Spalte B in die Zeile 1,2,3,... übernehmen - aber nur wenn in den Zeilen 4,40,76, ... ein Wert steht.

Wer kann helfen ???
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Jede 10. Zeile aus einer Spalte übernehmen
16.09.2003 00:28:15
PeterW
Hallo Robert,

erklär bitte nochmal genauer was du wann übernehmen willst; aus Zeile 10, 20, 30 soll etwas übernommen werden wenn in Zeile 4, 40, 76 ein Wert steht????

Gruß
Peter
AW: Jede 10. Zeile aus einer Spalte übernehmen
16.09.2003 00:41:26
Robert
Entschuldigung ! Mein Fehler - also hier Versuch Nr. 2 :

Im "Tab01" sollen die Werte der Spalte H , die in der Zeile 10,20,30,...(also jede 10. Zeile) stehen, nach "Tab02" in die Spalte B in die Zeile 1,2,3 ... übertragen werden - aber nur wenn in der 10., 20.,30. Zeile in "Tab01" tatsächlich ein Wert steht.

Ich hoffe, nun ist es verständlicher.
Anzeige
AW: Jede 10. Zeile aus einer Spalte übernehmen
16.09.2003 00:57:46
PeterW
Hallo Robert,

aus Tab01 aufgerufen dürfte folgender Code deine Aufgabe lösen.

Gruß
Peter

Sub Jede_10_Zeilen()
Dim lgRowZiel As Long
Dim lgRowQuelle As Long
lgRowZiel = 1
For lgRowQuelle = 10 To Range("H65536").End(xlUp).Row Step 10
If Cells(lgRowQuelle, 8) <> "" Then
Sheets("Tab02").Cells(lgRowZiel, 2) = Cells(lgRowQuelle, 8)
lgRowZiel = lgRowZiel + 1
End If
Next
End Sub

Anzeige
AW: Jede 10. Zeile aus einer Spalte übernehmen
16.09.2003 01:27:18
Robert
Peter !

Perfekt - Danke !
;

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

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