Problem mit 2 Schleifen
11.01.2005 19:54:41
Numberg
Ich habe ein Problem ich will in einem Makro 2 Schleifen einbauen.
z.B. so:
Sub test()
For a = 40 to 42
For b = 1 to 3
Cells(1, b) = a
Next b
Next a
End Sub
Mein Problem ist, dass jetzt in allen drei Zellen 42 steht.
Ich will aber, dass in der Zelle (1, 1) = 40, Zelle (1, 2) = 41 usw.
Wo liegt mein Fehler?
Danke
Numberg
Bemerkung: Mein Makro sieht nicht genauso aus ich hab nur ein kleines Beispiel gemacht, weil dort mein Problem liegt.
Anzeige