Per Recordset nach gewisse Datensätze vom letzten Monat suchen

[johawe2605]

Hallo miteinander,

benötige eure Hilfe. Ich will von meiner Tabelle alle Aufträge von einem Kunden vom letzten Monat suchen und die anzahl ermitteln. Wenn ich den recordset schreibe erhalte ich im VBA schon eine Fehlermeldung. Der Befehl bleibt rot markiert. Hier der Befehl:

Dim rcsAuftraege As DAO.Recordset
   
Set rcsAuftraege = CurrentDb.OpenRecordset("Select * from Auftraege WHERE Auftraggeber = 'Firma' And Eingangdatum = Month(DateAdd("m",-1,Date()))",dbOpenDynaset)

Gruß
Johawe2605

[DF6GL]

<<gelöscht>>

Crossposting..