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

Forumthread: Monatsende ermitteln

Monatsende ermitteln
30.05.2006 08:38:35
Thomas
Hallo,
ich habe folgendes Problem. Ich habe eine Datum von und ein Datum bis, z.B.
von: 29.05.06 bis: 04.06.06.
Wie kann ich jetzt mit VBA ermitteln, das z.B. der Monat Mai am 31'ten endet.
Ich will nähmlich nur die Tage bis zum Ende des Monats verarbeiten.
Gruß Thomas
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Monatsende ermitteln
30.05.2006 08:49:19
Bertram
Hallo Thomas,
ohne VBA:
in A1 dein von Datum
in B1 =MONATSENDE(A1;0)
in C1 =B1-A1
ergibt Anzahl Tage.
Gruß
Bertram
AW: Monatsende ermitteln
30.05.2006 08:53:52
Thomas
Das funktioniert irgendwie nicht, im Zelle B1 steht dann immer #NAME?.
Thomas
AW: Monatsende ermitteln
30.05.2006 09:03:43
Bertram
Hi Thomas,
du musst unter Extras-Add-Ins-Manager die Analyse-Funktionen installieren, dann sollte es gehen.
Gruß
Bertram
Anzeige
AW: Monatsende ermitteln
30.05.2006 09:04:51
AndreasG
Hallo Thomas,
per Formel gehts so: =DATUM(JAHR(A1);MONAT(A1)+1;0)
Grüsse
Andreas
AW: Monatsende ermitteln
30.05.2006 09:09:48
Thomas
Hm, gut und wie kann ich das in VBA abfragen, da ich das ganze in VBA händeln muß?
mfg Thomas
DateSerial(2006, 6, 0)
30.05.2006 09:50:07
Hugo
Hugo
Anzeige
AW: Monatsende ermitteln
30.05.2006 09:13:51
rlenz
Hallo Thomas,
vielleicht so:
 
 ABC
1vonbisbis Monatsende wenn anderer Monat in B2, sonst B2 - A2
229.05.200604.06.20062
Formeln der Tabelle
C2 : =WENN(B2>=DATUM(JAHR(A2);MONAT(A2)+1;0);DATUM(JAHR(A2);MONAT(A2)+1;0)-A2;B2-A2)
 
Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  
MfG
Rüdiger Lenz
Anzeige
AW: Monatsende ermitteln
30.05.2006 10:35:48
Gert
Hallo Thomas,
stehen alle Daten in Zeile 2 ergibt sich folgende Formel in C2 :
=MONATSENDE(A2;0)-A2
mfg
Gert
AW: Monatsende ermitteln
30.05.2006 11:41:49
Thomas
Ich danke euch allen, nur ich brauch das für VBA und dort gibt es keine Funktion "MONATSENDE"
mfg Thomas
...aber DateSerial gibt es oT
30.05.2006 11:51:58
Hugo
Hugo
Anzeige
AW: ...aber DateSerial gibt es oT
30.05.2006 11:54:54
Thomas
Ja, das stimmt. Ich wußte bloß nicht wie man das verwendet, hab aber just in diesem Moment die Lösung gefunden.
dateLTag=CDate(DateSerial(Year(datum), Month(datum) + 1, 0))
Vielen Dank nochmal an alle die geantwortet haben.
mfg Thomas
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Monatsende in Excel und VBA ermitteln


Schritt-für-Schritt-Anleitung

Um das Monatsende in Excel zu ermitteln, kannst Du sowohl Formeln als auch VBA verwenden. Hier sind die Schritte für beide Methoden:

Mit Excel-Formeln:

  1. Gib in Zelle A1 das Startdatum ein (z.B. 29.05.2006).
  2. Verwende in Zelle B1 die Formel:
    =MONATSENDE(A1; 0)
  3. Um die Anzahl der verbleibenden Tage bis zum Monatsende zu berechnen, gib in Zelle C1 folgende Formel ein:
    =B1 - A1

Mit VBA:

  1. Öffne den VBA-Editor (ALT + F11).

  2. Füge ein neues Modul hinzu.

  3. Verwende den folgenden Code, um das Monatsende zu ermitteln:

    Function Monatsende(datum As Date) As Date
       Monatsende = DateSerial(Year(datum), Month(datum) + 1, 0)
    End Function
  4. Um das Monatsende in einer Zelle anzuzeigen, kannst Du jetzt die Funktion verwenden:

    =Monatsende(A1)

Häufige Fehler und Lösungen

  • #NAME? Fehler: Dieser Fehler tritt auf, wenn die Funktion MONATSENDE nicht erkannt wird. Stelle sicher, dass die Analyse-Funktionen installiert sind. Gehe zu Extras > Add-Ins und aktiviere die Analyse-Funktionen.

  • VBA-Funktion funktioniert nicht: Wenn Du die Funktion Monatsende in VBA nicht aufrufen kannst, überprüfe, ob Du das Modul korrekt erstellt hast und die Funktion nicht in einer anderen Arbeitsmappe definiert ist.


Alternative Methoden

Falls Du keine VBA verwenden möchtest, kannst Du die Anzahl der Tage bis zum Monatsende ebenfalls mit der Formel DATUM ermitteln:

=DATUM(JAHR(A1), MONAT(A1) + 1, 0) - A1

Diese Formel gibt ebenfalls die Anzahl der Tage bis zum Monatsende zurück.


Praktische Beispiele

Hier sind einige praktische Beispiele zur Verwendung der Formeln und VBA-Funktionen:

  1. Beispiel 1: Wenn Du das Datum 29.05.2006 in A1 hast:

    • In B1: =MONATSENDE(A1; 0) gibt 31.05.2006 zurück.
    • In C1: =B1 - A1 ergibt 2 (Tage bis Monatsende).
  2. Beispiel 2: Mit der VBA-Funktion:

    • Wenn datum in A1 15.04.2023 ist, dann gibt =Monatsende(A1) in der Zelle 30.04.2023 zurück.

Tipps für Profis

  • Nutze die VBA-Funktion DateSerial, um das Monatsende dynamisch zu berechnen. Dies ist besonders nützlich, wenn Du mit Datumswerten in Schleifen arbeitest.
  • Vermeide die Verwendung von festen Datumsangaben in Deinen Formeln, um die Wartbarkeit zu erhöhen.
  • Verwende die Funktion WENN, um spezielle Bedingungen zu prüfen, beispielsweise ob das Datum im aktuellen Monat liegt.

FAQ: Häufige Fragen

1. Wie kann ich das Monatsende erkennen, wenn das Datum in einer anderen Zelle steht?
Du kannst die Funktion MONATSENDE oder die VBA-Funktion Monatsende einfach auf die Zelle anwenden, die das Datum enthält.

2. Was ist, wenn ich das Monatsende für mehrere Daten ermitteln möchte?
Du kannst die Formeln nach unten ziehen oder die VBA-Funktion in einer Schleife verwenden, um das Monatsende für eine Liste von Daten zu berechnen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige