ACCESS: Necesito una solució urgente...

[mbelgp]

Hola, tengo un problema con una base de datos en access. explico un poco el tema...

Tengo creada varias consultas (como 15), de cada una de ella tengo que sacar un informe, todos del mismo mes, y esos informe se deben unificar en uno. Mi problema como hacer para que la fecha la pregunte solo una vez. Todo sale perfecto si en cada una de las consultas hago una consulta por paramentros... pero eso significa escribir 15 veces la fecha.

Gracias

[SPAWN3000]

Iniciado por mbelgp

Hola, tengo un problema con una base de datos en access. explico un poco el tema...

Tengo creada varias consultas (como 15), de cada una de ella tengo que sacar un informe, todos del mismo mes, y esos informe se deben unificar en uno. Mi problema como hacer para que la fecha la pregunte solo una vez. Todo sale perfecto si en cada una de las consultas hago una consulta por paramentros... pero eso significa escribir 15 veces la fecha.

Gracias

SI sabes utilizar programar no tendrás problema, crear un formulario que reciba como parámetro la Fecha(Puede ser un DatePicker), se almacena en una variable y abres cada reporte pasando como parámetro el dato:

1. Si es desde un formulario
consulta donde campodeconsulta= [forms]![nombreformulario]![fecha]
2. El asistente te puede ayudar a crear una y ver como funciona, luego lo aplicas para las demas.

3. Desde el reporte:
Private Sub Report_Open(Cancel As Integer)
Dim dato As String

dato = [forms]![nombreformulario]![fecha]

End Sub

Espero te sirva.

Un saludo

[mbelgp]

Hola de nuevo,

La fecha tiene formato string ya que solo necesito el mes/año. Lo estoy intentando así:

Private Sub GenerarInforme_Click()
Dim fechasolicitada As String

fechasolicitada = InputBox("Escribe la fecha: Mes/Año: ")
'solicita la fecha

DoCmd.OpenReport Informe1, acViewPreview, , "MES = fechasolicitada"

End Sub

si le paso la variable me da error en "MES= fechasolicitada", si le pongo directamente la fecha, por ejemplo, '01/2010' funciona correctamente, ¿hago algo mal?

Gracias.

[Taribo007]

Si como dices, el campo mes es de tipo String:

DoCmd.OpenReport Informe1, acViewPreview, , "MES='" & fechasolicitada & "'"

Un saludo

[mbelgp]

Un millooooooon de gracias. Funciona!!!!!!!!