moinmoin...
ich hab den Thread aufmerksam verfolgt und soweit verstanden, dass das
folgende die Tabellenblätter für den Zeitraum 01.10.09 bis 31.12.09 erzeugt.
Sub Monatsblätter()
For Monat = 305 To 396
Set Sh = Worksheets.Add(after:=Worksheets(Worksheets.Count))
Sh.Name = Format(DateSerial(2009, Tag, Monat), "dddd,dd.mm.yy")
Next
Set Sh = Nothing
End Sub
Was mir nicht in den Kopf will, ist die zweite Zeile. Wieso Monat von 305 bis 396? Ich sehe, dass das gewünschte Ergebnis rauskommt, aber ich versteh's nicht. Was ist das für ein Format? Wieso ist Monat 1 = 01.12.2008?
Wie komme ich von der Zahl 305 zum 01.10.2009?
Rubuäh... bitte mal erklären...