Max
10 de Febrero del 2004

Se que me debo estar equivocando en alguna tonteria pero no logro ver el que.
Este es el codigo que no consigo que funcione

Private Sub UltimTrim_Click()

Dim UltimGrup As Long

UltimGrup = DLast("[idgrupoclases]", "TblGrupoClases") 'da a esta variable un valor de tipo long

If GestionMat = 1 Then 'Es un valor otorgado a una variable publica

DoCmd.OpenForm "FormModMat", , , "[PagoAplasado]=true and [idgrupoclases]=UltimGrup" 'Aqui falla

Else 'Ver todas las matriculas del ultimo trimestreo para eliminarlas o para imprimirlas

DoCmd.OpenForm "FormModMat", , , "IdGrupoClases = UltimGrup" 'Aqui falla


End If

End Sub

Lo que quiero es que dependiendo del valor de la variable en la condicion el formulario en cuestion
muestre una serie de valores

Muchas gracias de antemano