Tipp 2.3 - Monatsresttage berechnen

Wie kann ich die Anzahl der restlichen Tage des aktuellen Monats ermitteln?

Mit dieser Funktion können Sie die Anzahl der restlichen Tage des aktuellen Monats ermitteln. Kopieren Sie einfach nachfolgenden Quellcode in die Zwischenablage und fügen Sie anschließend den Inhalt der Zwischenablage in ein neues Modul ein. Die Aufrufparameter finden Sie im Quellcode beschrieben.

Beispiel:

Option Explicit
 
Public Function DaysLeftCurrentMonth() As Long
  '// -----------------------------------------------------
  '// Methode:   | Anzahl restlicher Tages des aktuellen
  '//            | Monats ermitteln
  '// -----------------------------------------------------
  '// Rückgabe:  | s.o.
  '// -----------------------------------------------------
  '// Autor:     | Stefan Kulpa
  '//            | EDV Innovation & Consulting - Dormagen
  '// -----------------------------------------------------
  DaysLeftCurrentMonth = _
      Day(DateAdd("d", -1, CDate("01." & _
      Month(DateAdd("m", 1, Date)) & "." & _
            Year(Date)))) - Day(Date)
 
End Function


Zurück Tipp 2.2 - Resttage berechnen | Inhalt | Tipp 2.4 - Anzahl Tage Weiter