Filtrar por 1 mes y que me devuelva el mes y el anterior

[ErPiloto]

Hola a todos.

Tengo el siguiente código en un botón de un formulario:

Código:

Private Sub Comando2_Click()
Dim Filtro As String
Dim qdf As DAO.QueryDef
Dim sSql As String

sSql = "SELECT * FROM nominas "


If Nz(Me.monitor, "") <> "" Then
Filtro = Filtro & " monitor='" & Me.monitor & "' AND "
End If
If Nz(Me.Cuadro_combinado7, "") <> "" Then
Filtro = Filtro & " [fecha_fin_curso Por mes]='" & Me.Cuadro_combinado7 & "' AND "
End If


If Nz(Filtro, "") <> "" Then
Filtro = Left(Filtro, Len(Filtro) - 4)
Set qdf = CurrentDb.QueryDefs("nominas2")
qdf.SQL = sSql & " Where " & Filtro
DoCmd.OpenQuery "nominas2"


Else
MsgBox "Es necesario escoger al menos un factor de búsqueda", vbInformation
End If
End Sub

Con él, selecciono un monitor y un mes (Cuadro_combinado7) y me saca los datos correspondientes.
La pregunta es, cómo modifico esto, para que me devuelva los datos correspondientes al mes de búsqueda (el que aparece en Cuadro_combinado7) y al mes anterior.
Es decir, si en el form tengo
Monitor = Antonio Rodríguez
Cuandro_combinado7 = Febrero
que al hacer clic en el botón me devuelva los datos correspondientes a Antonio Rodríguez del mes de Febrero y del de Enero.

Por favor, agradezco cualquier idea.
Gracias.

[Malenko]

Si las fechas las guardas como datetime puedes usar dateadd para hacer un between entre la fecha del mes anterior (obtenida con un dateadd) y la fecha del mes actual.