Letzten Monat als "Monat Jahr" in der Kopfzeile anzeigen

[volvisti]

Hallo zusammen,
vielleicht ist der Betreff etwas verwirrend, aber mir fiel nichts besseres ein. 

Folgendes "Problem":
Ich möchte gerne in der Kopfzeile des Berichtes den letzten Monat und das Jahr ausgeben.
Also soll z.B. im November 2023 dort Oktober 2023 stehen
mit =Monat(Datum())-1 erhalte ich "10"
mit =Format(Datum()-1;"mmmm jjjj") erhalte ich "November 2023"
mit =Format(Monat(Datum())-1 and Jahr(Datum());"mmmm jjjj") erhalte ich "Januar 1900"
Nun könnte ich in der zweiten Zeile nicht nur einen Zähler sondern 15 Zähler abziehen, aber das ist nicht sauber.

Ich komme hier nicht weiter und bitte Euch um Hilfe.
Vielen Dank schon jetzt.

Beste Grüße
Sönke

[andyfau]

Kleine Funktion: (in ein allgemeines VBA-Modul legen)

Code [Auswählen] Erweitern

Public Function Vormonat(Vdatum As Date) As String
    Dim vmonat As Integer
    Dim vjahr As Integer
    vmonat = Month(Vdatum) - 1
    vjahr = Year(Vdatum)
    If vmonat = 0 Then
       vmonat = 12
       vjahr = vjahr - 1
    End If
    Vormonat = MonthName(vmonat) & " " & vjahr

End Function
Prameter Vdatum bei Aufruf kann z.B. Date() für Tagesdatum oder jedes andere Datum im Format #mm/dd/yyyy# sein.

z.B im Berichtsfeld:

Code [Auswählen] Erweitern

=Vormonat(Date())
Beste Grüße
Andreas

[MzKlMu]

Hallo,
oder direkt im Feld als Steuerelementinhalt mit der Datumsfunktion DatSeriell:

Code [Auswählen] Erweitern

=Format(DatSeriell(Jahr(Datum());Monat(Datum())-1;1);"mmmm jjjj")

[volvisti]

Hallo Andreas und Klaus,
vielen lieben Dank für die Hilfe.

Euch ein schönes Wochenende