Informes : Cómo saber si un informe tiene registros
|
Autor/es: Juan M Afán de Ribera |
| Pregunta : ¿Existe algún código que me permita averiguar, antes de abrir un informe, si existen registros para mostrar, de manera que, en caso afirmativo, envíe un mensaje al usuario y cierre ese informe? |
Respuesta : En los informes existe un evento llamado NoData (Al no haber datos) que se encarga precisamente de eso.
Sabiendo eso, podríamos utilizar un código parecido a éste, de manera que enviáramos un mensaje y después cancelaríamos la apertura del informe: |
Private Sub Report_NoData(Cancel As Integer)
' enviamos un mensaje
MsgBox "No existen registros relacionados", vbInformation
' cancelamos la apertura del informe
Cancel = True
End Sub
|
| Y con eso sería suficiente |
Ejemplos: |
Temas relacionados: Cómo saber si un formulario tiene registros |