Eintrag in mehreren Spalten
24.11.2005 13:46:02
Michael
Ich hoffe das ist meine letzte Frage für heute.
Ich trage über ein Makro jeweils etwas in die Spalte C ein. Ich möchte daß der fortlaufende Eintrag (der ist um einiges länger als unten angegeben)nicht in einer Spalte erfolgt sondern Spalte C3 - C63 dann weiter F3 - F63 und weiter I3 - I 63 usw. und dann bei der nächsten Fundstelle wieder dort weitergeht. Ich hoffe ihr kennt euch aus mit meinen Angaben.
Sub test2()
For n = 1 To Range("c65536").End(xlUp).Row
If Weekday(Cells(n, 3)) = 2 And Cells(n, 2) = "4" Then
Cells(n + 1, 2) = 1
Cells(n + 2, 2) = ""
Cells(n + 3, 2) = ""
Cells(n + 4, 2) = 3
Cells(n + 5, 2) = 1
End If
Next
End Sub
Danke für eure Hilfe
Michael