Evitar la apertura de un informe si no hay datos para mostrar

Enviado el Miércoles, 20 de mayo 2009 - 22:01 | por admin |

Podemos prevenir un informe abierto si no hay datos para mostrar, y para ello se utilizan dos formas, dependiendo de la versión de Access:

1 - Todas las versiones de Access
Coloque el código de abajo en las propiedades del informe, "que facilite" el evento

Utilice el evento de Habilitación (Activar) Informe:

Private Sub Report_Activate ()

Si DCont ("*", Me.RecordSource) = 0 entonces

MsgBox "No hay registros para mostrar" vbDefaultButton1, "Error!"

AcReport DoCmd.Close ", nombre del informe"

End If

End Sub

2 - Desde la versión 7 (Access 95), se añadió el caso de 'si no hay datos', entonces podemos urilizar el siguiente código:

Private Sub Report_NoData (Cancel As Integer)

MsgBox "No hay datos en el informe.", VbInformation, "Error!"

Cancelar = True

End Sub

Para ver correr descargar el ejemplo: impedir que el informe de apertura

RSS | Trackback URI

13 Comentarios »

Comentario por Michelle
2009-06-02 21:00:48

Me pregunto qué versión de Access que se utiliza para la apertura de las ventas del sistema en mi máquina, una base de datos de formato de mensaje no se reconoce.

Comentario por Administrator
2009-06-03 11:01:56

Todos los ejemplos se realizan en Access 2003. ¿Puedo enviar en otro formato antes de Access 2003 si lo desea.

Comentario por Thiago Santos
2009-07-31 14:24:46

Buenos días, estoy haciendo una forma de tabla, esta forma hay tres campos en cada columna con las fórmulas (expressaão) ejemplos:

Calculado1 Período - (menos) período de calculado2
(Espacio w / poner la fecha) (espacio p / poner la fecha)

Calculado3 Período - (menos) período de calculado4
(Espacio w / poner la fecha) (espacio p / poner la fecha)

Calculado5 Período - (menos) período de calculado6
(Espacio w / poner la fecha) (espacio p / poner la fecha)

después de que hace que el resultado de la diferencia de fecha a continuación, se multiplica por 30 con relación a una mensual "X", entonces el resultado de la expresión en estas columnas se traducirá en la adición de otro con un campo llamado de crédito, y p aparece / resultado en el campo de Crediton Tengo que llenar todas las columnas como campos que no son de datasn o poner la fecha de 00/00/0000, si me levanté ya era suficiente, sólo falta este w / terminar mi trabajo.
Si usted me puede ayudar gracias y felicitaciones por el ABRC blog. Thiago
Si usted no ha entendido Poso envío w / a por correo electrónico desde ya muchas gracias por su atención.

Comentario por Administrator
2009-07-31 20:38:53

Usted puede usar la función NZ

Calculado1 Período - (menos) Nueva Zelanda (calculado2 período)

Comentario por Luis
2009-08-09 19:59:58

Hola José

He descargado su sistema de ventas, MS tiene muchas
a DEBUG, descargan en las ventas del sistema para mí.
agradecido.

Comentario por Alan
2009-08-12 17:29:22

Usted tiene un archivo de ejemplo de cómo utilizar la función DBúsq = e = DBúsq

Comentario por Dri Viaro
2009-08-13 17:44:57

Hola, llegué a conocer su blog, y desea buenas noches
bjsss

Espero su visita :)

Comentario por Washington
2010-02-27 21:58:53

Es super fácil de prevenir un informe abierto

1) Abra el informe en Diseño y abra las propiedades de formulario.
2) Ir a la ficha Evento y seleccione SI NO HAY DATOS
3) Haga clic en el botón de puntos suspensivos (...)
4) Introduzca el código de abajo

Private Sub Report_NoData (Cancel As Integer)
MsgBox ("No hay información para este Informe")
Final
End Sub

5) Cierre el Editor de Visual Basic
6) Tenga en cuenta que aparece en el procedimiento de opción CASO HAY DATOS
7) Usted puede ejecutar el programa.

Comentario por Administrator
2010-04-25 18:05:39

Hay muchas maneras de llegar a una meta, escoger un solo y ser creativo.

Comentario por Bruce
2010-05-19 19:13:56

Usted puede usar la función NZ

Calculado1 Período - (menos) Nueva Zelanda (calculado2 período)

Comentario por Octavio Barros
2011-01-27 10:26:41

¡Buenos días! Usted puede crear un botón en el formulario para realizar una copia de seguridad de la base de datos?
Agradecido.

Comentario por Andrew
2011-07-26 22:43:07

Felicitaciones por el trabajo! Puedo visitar su sitio todos los días ... Por cierto, me gustaría indicar el sitio http://www.iAulas.com.br allí encontrará más de 10.000 libros de texto gratis para descargar todo tipo de temas, incluyendo acceso a los folletos ... Me han ayudado ...

Comentario por José Oliveira
2011-08-30 18:47:59

en realidad estaba buscando ejemplos maravillosos de acceso
Muchas gracias

Nombre (requerido)
Correo electrónico (obligatorio - no publicada)
Sitio web
Tu comentario ( Disminución | Aumentar )
Usted puede usar <a href="" title=""> <abbr title=""> <acronym title=""> <blockquote cite=""> <b> <cite> <code> <del datetime=""> <em> <i> <Q cite=""> <strike> <strong> en los comentarios.

Presentación

Avatar

Gracias por su visita.
Suscribirse a la fuente para no perderse ningún mensaje.

Aquí en el blog voy a dar ejemplos de trabajo con Microsoft Access, así como hacer preguntas a los que piden. Más

¿Quieres suscribirte?

Suscribirse o suscribirse por e-mail:
Introduce tu email:


Anuncios