Cómo aplicar un filtro en un boton de comando? Codigo VBA

[Laufwerk]

Hola !!!
Soy nuevo en VBA y access.
Estoy liado en un proyecto y encallado por culpa de que no se poner un filtro al hacer click en un boton de comando.
Al hacer click me abre un formulario, sobre una tabla. Uno de los campos de la tabla es fecha de baja juntamente con un checkbox.
Lo que yo quiero es que al hacer click sólo me muestre los activos.
En el otro command button quiero q me muestre solo los dados de baja.
Lo que tengo es este código, pero no funciona:
Private Sub Altes_Click()
On Error GoTo Err_Altes_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Persona_temp"
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.ApplyFilter , ((Donar_de_Baixa = False) And (Data_Baixa = Not Null))
Exit_Altes_Click:
Exit Sub
Err_Altes_Click:
MsgBox Err.Description
Resume Exit_Altes_Click
End Sub


de donde podeis deducir:
Donar_de_Baixa es un campo checkbox del formulario Persona_temp
y
Data_Baixa es un campo tipo fecha del formulario Persona_temp


Gracias por adelantado.