Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
352to356
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
352to356
352to356
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

For Each Schleife steuern

For Each Schleife steuern
18.12.2003 12:58:31
marc
hallo zusammen,

ich moechte die for-each-schleife so steuern,
dass beim jedem start die werte in die naechste spalte kopiert werden.
erster start in spalte A wurden die vier werte eingetragen,dann
zweiter start in spalte B usw.


Sub Felder_in_Spalten()
Const Spalte = 1
Dim zelle As Range
Dim I As Integer
I = 1
For Each zelle In Range("J2:J5")
Cells(I, Spalte).Value = zelle.Value
I = I + 2
Next
End Sub


marc.

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

Betreff
Datum
Anwender
Anzeige
AW: For Each Schleife steuern
18.12.2003 14:55:24
Andi
Hi marc,

ich hab das jetzt net ausprobiert, aber so müsste es eigentlich gehen:


Sub Felder_in_Spalten()
Dim spalte as Integer
Dim zelle As Range
Dim I As Integer
I = 1
for spalte = 1 to 256
if cells(I,spalte).Value = "" then exit for
next spalte
For Each zelle In Range("J2:J5")
Cells(I, Spalte).Value = zelle.Value
I = I + 2
Next
End Sub


Schönen Gruß
Andi
AW: Marc sagt Danke Andy
18.12.2003 22:08:51
marc
Danke.

marc :o)

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige