openForm
Publicado por almudena (3 intervenciones) el 16/04/2007 17:19:19
Hola quisiera saber como puedo poner dos condiciones en un open form
Valora esta pregunta


0
DoCmd.OpenForm "NombreFormulario", acNormal, , "Campo1 = Valor1 AND Campo2 = Valor2"
Dim strCondicion As String
strCondicion = ""
If Condicion1Cumplida Then
strCondicion = "Campo1 = Valor1"
End If
If Condicion2Cumplida Then
If strCondicion <> "" Then
strCondicion = strCondicion & " AND "
End If
strCondicion = strCondicion & "Campo2 = Valor2"
End If
DoCmd.OpenForm "NombreFormulario", acNormal, , strCondicion