Hallo und guten Morgen,
ich würde gerne anhand einer Monatsliste (der Wochentag steht in Spalte ‚A‘ und das jeweilige Datum in Spalte ‚B‘) automatisch Wochenlisten erstellen, die am Montag beginnen. Also nichts anderes wie den Monat in Kalenderwochen unterteilen. Gibt es die Möglichkeit, Zellen mit Namen o.Ä. zu versehen, dass somit der ‚Montag‘ immer wieder gefunden wird, auch wenn sich das Datum ändert? Ich verwende Excel 2000, und hab keine Ahnung wie ich das machen soll…
Ich bedanke mich schon mal im Voraus für jeden Tipp,
schöne Grüße,
Thomas
ich würde gerne anhand einer Monatsliste (der Wochentag steht
in Spalte ‚A‘ und das jeweilige Datum in Spalte ‚B‘)
automatisch Wochenlisten erstellen, die am Montag beginnen.
Also nichts anderes wie den Monat in Kalenderwochen
unterteilen. Gibt es die Möglichkeit, Zellen mit Namen o.Ä. zu
versehen, dass somit der ‚Montag‘ immer wieder gefunden wird,
auch wenn sich das Datum ändert? Ich verwende Excel 2000, und
hab keine Ahnung wie ich das machen soll…
Hallo Thomas,
formatiere B als Datum, dann schreibe in B1 ein Startdatum, klicke dann auf die rechte untere Ecke von B1 (Der Cursor wird ein Kreuz) und zieh soweit wie benötigt nach unten.
Dann füge in A1 folgende Formel ein:
=WENN(ODER(TEXT(B1;„TTTT“)=„Sonntag“;TEXT(B1;„TTTT“)=„Samstag“);"";TEXT(B1;„TTTT“))
und zieh das analog wie zuvor auch nach unten…
Gruß
Reinhard
formatiere B als Datum, dann schreibe in B1 ein Startdatum,
klicke dann auf die rechte untere Ecke von B1 (Der Cursor wird
ein Kreuz) und zieh soweit wie benötigt nach unten.
Dann füge in A1 folgende Formel ein:
=WENN(ODER(TEXT(B1;„TTTT“)=„Sonntag“;TEXT(B1;„TTTT“)=„Samstag“);"";TEXT(B1;„TTTT“))
und zieh das analog wie zuvor auch nach unten…
Gruß
Reinhard
Hallo Reinhard,
vielen Dank für Deine Antwort! Das war leider nicht das, was ich bräuchte (hab ich mich mal wieder undeutlich ausgedrückt 
) Mein Problem ist, dass er sich immer eine Woche „schnappen“ und in eine neue Arbeitsmappe kopieren sollte. Ich fürchte, ohne VBA wird das wohl nix werden…
Ich wünsch noch ein schönes Wochenende,
Gruß,
Thomas
Na und, nehmen wir halt VBA 
vielen Dank für Deine Antwort! Das war leider nicht das, was
ich bräuchte (hab ich mich mal wieder undeutlich ausgedrückt
( ) Mein Problem ist, dass er sich immer eine Woche
„schnappen“ und in eine neue Arbeitsmappe kopieren sollte. Ich
fürchte, ohne VBA wird das wohl nix werden…
Hallo Thomas,
hab dir das Folgende gebastelt, lief problemlos.
Gruß
Reinhard
Sub t()
'2003 by Reinhard
' In D2 wird das Startdatum erwartet, in E2 das Enddatum
' Makro koorigiert D2 und E2 so, dass es volle Wochen= 5Tage ergibt
' Die Wochen gehen von Montag bis Freitag.
' Jede Woche wird dann in ein neues Workbook kopiert und dieses
' unter dem Datum des jeweiligen Montags abgespeichert
' ohne option explicit und ohne Errorhandling
' Makro erwartet dass es in einer Datei Arbeitswochen.xls aufgerufen wird,
' wenn nicht muss im Code Arbeitswochen ersetzt werden!!
Application.ScreenUpdating = False
Range("A1:B65536").ClearContents
While Weekday(Range("d2"), vbMonday) 1
Range("d2") = Range("d2") - 1
Wend
While Weekday(Range("e2"), vbMonday) 5
Range("e2") = Range("e2") + 1
Wend
länge = (Range("e2") - Range("d2") + 3) / 7 \* 5
If länge
Hallo Thomas,
hab dir das Folgende gebastelt, lief problemlos.
Gruß
Reinhard
Hallo,
nochmals vielen Dank, damit kann ich was anfangen
Viele Grüße,
Thomas