Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Datumsangabe Montag der aktuellen Woche

Forumthread: Datumsangabe Montag der aktuellen Woche

Datumsangabe Montag der aktuellen Woche
28.10.2003 13:20:59
Rolf
Hallo Leute,

Vor einiger Zeit habe ich eine nützliche Formel bekommen, die Anhand des Datums die aktuelle Woche anzeigt:

=KÜRZEN((B12-WOCHENTAG(B12;2)-DATUM(JAHR(B12+4-WOCHENTAG(B12;2));1;-10))/7)

Meine Frage:

Ich habe im Makro eine InputBox. Als Vorgabe möchte ich gerne das Datum vom Montag der aktuellen Woche.
Bsp: Woche 44 = 27.10.2003
Woche 46 = 10.11.2003

Es soll aber auch funktionieren, wenn ich z.B. am Mittwoch 29.10.2003 in die Excel-Tabelle gehe, und die Funktion aktiviere (Desshalb geht =Heute() nicht!)

Wie kann ich das hinkriegen?

Danke für eure Vorschläge :-)
Rolf
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datumsangabe Montag der aktuellen Woche
28.10.2003 13:29:54
Holger Levetzow
versuche:
a = InputBox(Date - Weekday(Date, 1))

Holger
AW: Datumsangabe Montag der aktuellen Woche
28.10.2003 13:51:43
Rolf
Hallo Holger,

Ergebnis= 25.10.2003 ?
AW: Datumsangabe Montag der aktuellen Woche
28.10.2003 13:55:25
Rolf
Kann das daran liegen, dass die Amerikanische Woche mit dem Sonntag beginnt? Mit (date;3) funktioniert es, aber was zeigt er wohl Morgen an? Auch noch demn Montag?

Gruss und Danke

Rolf
Anzeige
AW: Datumsangabe Montag der aktuellen Woche
28.10.2003 14:17:35
Markus H.
stell doch einfach mal das datum deines systems um, um es zu testen.. ;)
AW: Datumsangabe Montag der aktuellen Woche
28.10.2003 15:11:36
Rolf
Leider Administratoren - Netzwerk :-(

Gruss Rolf
AW: Datumsangabe Montag der aktuellen Woche
28.10.2003 15:32:20
Holger Levetzow
a = InputBox(Date - Weekday(Date) + 2)
liefert Dir an jedem Tag den Montag der aktuellen Woche

mfg Holger
Anzeige
;
Anzeige

Infobox / Tutorial

Datumsangabe für den Montag der aktuellen Woche in Excel


Schritt-für-Schritt-Anleitung

Um das Datum des Montags der aktuellen Woche in Excel zu ermitteln, kannst Du die folgende Formel verwenden:

=HEUTE() - WOCHENTAG(HEUTE(); 2) + 1

Diese Formel berechnet das Datum des Montags, indem sie den aktuellen Tag (HEUTE()) nimmt und den Wochentag davon abzieht. WOCHENTAG(HEUTE(); 2) gibt den Wochentag als Zahl zurück, wobei Montag als 1 gilt. Durch die Addition von 1 erhältst Du das Datum des Montags.

Wenn Du diese Berechnung in einem Makro verwenden möchtest, kannst Du die folgende Zeile in Deine InputBox einfügen:

a = InputBox(Date - Weekday(Date, 2) + 1)

Diese Zeile funktioniert unabhängig vom aktuellen Wochentag und liefert immer den Montag der aktuellen Woche.


Häufige Fehler und Lösungen

  • Fehler: Das Ergebnis zeigt ein falsches Datum an.

    • Lösung: Stelle sicher, dass Du die richtige Wochentagsnummer verwendest. In Excel beginnt die Woche bei WOCHENTAG(...; 2) mit Montag als 1.
  • Fehler: Die Formel funktioniert nicht wie erwartet, wenn das Datum auf einen Sonntag fällt.

    • Lösung: Die Anpassung der Formel auf Date - Weekday(Date, 2) + 1 sorgt dafür, dass der Montag korrekt berechnet wird, egal an welchem Tag Du die Formel anwendest.

Alternative Methoden

Eine alternative Methode zur Berechnung des Montags der aktuellen Woche wäre die Verwendung von VBA. Hier ist ein einfaches Makro, das den Montag der aktuellen Woche in einer MessageBox anzeigt:

Sub MontagDerAktuellenWoche()
    Dim Montag As Date
    Montag = Date - Weekday(Date, 2) + 1
    MsgBox "Der Montag dieser Woche ist: " & Montag
End Sub

Dieser Code kann in einem Modul in Excel hinzugefügt werden und gibt Dir den Montag der aktuellen Woche aus.


Praktische Beispiele

Angenommen, wir haben den heutigen Tag, den 29. Oktober 2023 (ein Sonntag). Mit der oben genannten Formel erhältst Du:

=HEUTE() - WOCHENTAG(HEUTE(); 2) + 1

Das Ergebnis wäre der 23. Oktober 2023, was der Montag der aktuellen Woche ist.

Ein weiteres Beispiel ist die Verwendung in einem Makro, um das Datum des Montags in einer Zelle zu speichern:

Sub SetzeMontag()
    Cells(1, 1).Value = Date - Weekday(Date, 2) + 1
End Sub

Hier wird der Montag der aktuellen Woche in Zelle A1 geschrieben.


Tipps für Profis

  • Nutze die WENN-Funktion zusammen mit der Montag-Berechnung, um spezifische Aktionen basierend auf dem aktuellen Datum auszuführen.
  • Überlege, die Berechnung des Montags in einer benutzerdefinierten Funktion zu kapseln, falls Du sie häufig benötigst.
  • Halte Deine Excel-Version aktuell, um sicherzustellen, dass alle Funktionen und Formeln korrekt arbeiten.

FAQ: Häufige Fragen

1. Wie funktioniert die WOCHENTAG-Funktion in Excel?
Die WOCHENTAG-Funktion gibt den Wochentag eines bestimmten Datums als Zahl zurück. Mit dem Argument 2 wird Montag als 1 betrachtet.

2. Kann ich die Formel auch für andere Wochentage verwenden?
Ja, Du kannst die Formel entsprechend anpassen, um andere Wochentage zu berechnen, indem Du die Parameter in der WOCHENTAG-Funktion änderst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige