Informes
Hola,
este es mi problema
Tengo tabla con un campo empresa
Como puedo imprimir informes de varias empresas sin tener que crear uno por cada empresa
Informe 1 - empresa 1
Informe 2 - empresa 2
Informe ... - empresa ...
este es mi problema
Tengo tabla con un campo empresa
Como puedo imprimir informes de varias empresas sin tener que crear uno por cada empresa
Informe 1 - empresa 1
Informe 2 - empresa 2
Informe ... - empresa ...
1 respuesta
Respuesta de soria4xse
1
Solo necesitas un informe.
En el formulario de empresas, en vista diseño, agregas un botón de comando para imprimir o abrir en vista previa ese informe único.
En propiedades, en procedimiento de evento, ves Algo parecido a esto, si por ejemplo el informe se llama INF_Empresas y lo abres en vista previa:
--------
Private Sub Comando5_Click()
On Error GoTo Err_Comando5_Click
Dim stDocName As String
stDocName = "INF_Empresas"
DoCmd.OpenReport stDocName, acPreview
Exit_Comando5_Click:
Exit Sub
Err_Comando5_Click:
MsgBox Err.Description
Resume Exit_Comando5_Click
End Sub
---
Esto lo modificamos un poco
Si por ejemplo en el formulario el cuadro de texto donde esta 'empresa 1' es Texto9 y En la tabla de empresas el campo se llama IDEmpresa,
Pones
1)
Antes de donde dice
DoCmd. OpenReport stDocName, acPreview
Tu pones:
Dim wh As String
wh="IDEmpresa=" & me.Texto9
2) Y al final de la misma linea, agregas,, wh
la linea queda
DoCmd.OpenReport stDocName, acPreview, , wh
puesto todo de nuevo quedará así:
--------
Private Sub Comando5_Click()
On Error GoTo Err_Comando5_Click
Dim wh As String
wh = "IDEmpresa=" & Me.Texto9
Dim stDocName As String
stDocName = "FECHAS"
DoCmd.OpenReport stDocName, acPreview, , wh
Exit_Comando5_Click:
Exit Sub
Err_Comando5_Click:
MsgBox Err.Description
Resume Exit_Comando5_Click
End Sub
--------
Salud
En el formulario de empresas, en vista diseño, agregas un botón de comando para imprimir o abrir en vista previa ese informe único.
En propiedades, en procedimiento de evento, ves Algo parecido a esto, si por ejemplo el informe se llama INF_Empresas y lo abres en vista previa:
--------
Private Sub Comando5_Click()
On Error GoTo Err_Comando5_Click
Dim stDocName As String
stDocName = "INF_Empresas"
DoCmd.OpenReport stDocName, acPreview
Exit_Comando5_Click:
Exit Sub
Err_Comando5_Click:
MsgBox Err.Description
Resume Exit_Comando5_Click
End Sub
---
Esto lo modificamos un poco
Si por ejemplo en el formulario el cuadro de texto donde esta 'empresa 1' es Texto9 y En la tabla de empresas el campo se llama IDEmpresa,
Pones
1)
Antes de donde dice
DoCmd. OpenReport stDocName, acPreview
Tu pones:
Dim wh As String
wh="IDEmpresa=" & me.Texto9
2) Y al final de la misma linea, agregas,, wh
la linea queda
DoCmd.OpenReport stDocName, acPreview, , wh
puesto todo de nuevo quedará así:
--------
Private Sub Comando5_Click()
On Error GoTo Err_Comando5_Click
Dim wh As String
wh = "IDEmpresa=" & Me.Texto9
Dim stDocName As String
stDocName = "FECHAS"
DoCmd.OpenReport stDocName, acPreview, , wh
Exit_Comando5_Click:
Exit Sub
Err_Comando5_Click:
MsgBox Err.Description
Resume Exit_Comando5_Click
End Sub
--------
Salud
Pues veo que yo tampoco te entiendo bien lo que pides
¿Qué debo entender por eso que dices "un informe donde necesitaba que me imprimiese automáticamente varios informes ..."?
Ya no se si es que cada empresa va en una tabla vinculada o todas están en la misma
Si lo que quieres es algo para elegir la empresa a listar en el informe genérico
¿Qué quieres decir con cada informe es independiente?
Si es un solo informe sera porque el formato es el mismo y lo que cambian son los datos ¿no? ¿Y cómo cambian?
Tu dirás.
Pero bueno, en general podrías hacer tal vez un informe único y también una tabla nueva solo con la lista de las empresas que puedas querer imprimir
Insertas un formulario que no esta basado en datos y en el :
Insertas un cuadro combinado que se base en la tabla 'lista de empresas'
Insertas el botón de comando imprimir informe que te he dicho
... aproximadamente.
¿Qué debo entender por eso que dices "un informe donde necesitaba que me imprimiese automáticamente varios informes ..."?
Ya no se si es que cada empresa va en una tabla vinculada o todas están en la misma
Si lo que quieres es algo para elegir la empresa a listar en el informe genérico
¿Qué quieres decir con cada informe es independiente?
Si es un solo informe sera porque el formato es el mismo y lo que cambian son los datos ¿no? ¿Y cómo cambian?
Tu dirás.
Pero bueno, en general podrías hacer tal vez un informe único y también una tabla nueva solo con la lista de las empresas que puedas querer imprimir
Insertas un formulario que no esta basado en datos y en el :
Insertas un cuadro combinado que se base en la tabla 'lista de empresas'
Insertas el botón de comando imprimir informe que te he dicho
... aproximadamente.
