Como hago para condicionar un Formulario
Necesito hacer un formulario que me muestre cierto reporte si en el cuadro de texto se introduce una palabra Clave, por ejemplo
Palabra ROJO, que me muestre el reporte A
Palabra AMARILLO, que me muestre el reporte B
Palabra VERDE, que me muestre el reporte C
Soy nuevo en esto me podrían ayudar.
Palabra ROJO, que me muestre el reporte A
Palabra AMARILLO, que me muestre el reporte B
Palabra VERDE, que me muestre el reporte C
Soy nuevo en esto me podrían ayudar.
1 respuesta
Respuesta de Augusto Cesar
1
El cuadro de texto en el evento después de actualizar o creas un botón y en el evento clic del botón copias y pegas esto (modifica según el nombre de los cuadros)
private sub cuadro afterUpdate()
on erro goto salir
if not isnull (me.cuadro) then
select case me.cuadro
case "Rojo"
docmd.openreport "nombre del informe" ' abrir el informe si es rojo
case "verde"
docmd.openreport "nombre del informe" 'abrir el inf si es verde
case "amarillo"
docmd.openreport "nombre del informe" abrir el inf si es amarillo
end select
end if
exit sub
salir :
msgbox "no se ha encontrado el informe"
end sub
private sub cuadro afterUpdate()
on erro goto salir
if not isnull (me.cuadro) then
select case me.cuadro
case "Rojo"
docmd.openreport "nombre del informe" ' abrir el informe si es rojo
case "verde"
docmd.openreport "nombre del informe" 'abrir el inf si es verde
case "amarillo"
docmd.openreport "nombre del informe" abrir el inf si es amarillo
end select
end if
exit sub
salir :
msgbox "no se ha encontrado el informe"
end sub
Excelente Solución, solo te falto agregar el parámetro para una vista previa ya que por default me envía los reportes a imprimir, muchas gracias
