z.B. als Standardwert in einem Formularfeld

erster Tag des aktuellen Monats:  

Datum()-Tag(Datum())+1

letzter Tag des aktuellen Monats: 

DatSeriell(Jahr(Datum());Monat(Datum())+1;0)

Erster und letzter Tag (VBA)

  • erster Tag des aktuellen Monats:   Date - Day(Date)+1
  • letzter Tag des aktuellen Monats:  DateSerial(Year(Date), Month(Date)+1,0