No imprimir informe en blanco
Hola, en un formulario tengo un botón desde el cual, al hacer click imprimo un informe (basado en el mismo formulario)con el código siguiente:
DoCmd.OpenReport "Nombre", acViewNormal,"", "[Codigo]=[forms]![clientes]![Codigo]"
Lo que quiero evitar es que si el formulario lo tengo en blanco porque no he introducido ningún dato, y por casualidad le doy a ese botón, pues que no me imprima el informe.
Lo he intentado poniendo en el evento "AL no haber datos" del informe el siguiente código, pero me da un error dirigido al código del botón del formulario:
Private Sub Report_NoData(Cancel As Integer)
MsgBox "Aviso desde el Reporte:" & Me.Name & Chr(13) & Chr(13) _
& "No hay datos para imprimir .", vbCritical + vbOKOnly, "AVISO"
Cancel = -1
End Sub
¿Qué hago mal?
¿Alguna solución?
Gracias desde ya
Jose Luis
DoCmd.OpenReport "Nombre", acViewNormal,"", "[Codigo]=[forms]![clientes]![Codigo]"
Lo que quiero evitar es que si el formulario lo tengo en blanco porque no he introducido ningún dato, y por casualidad le doy a ese botón, pues que no me imprima el informe.
Lo he intentado poniendo en el evento "AL no haber datos" del informe el siguiente código, pero me da un error dirigido al código del botón del formulario:
Private Sub Report_NoData(Cancel As Integer)
MsgBox "Aviso desde el Reporte:" & Me.Name & Chr(13) & Chr(13) _
& "No hay datos para imprimir .", vbCritical + vbOKOnly, "AVISO"
Cancel = -1
End Sub
¿Qué hago mal?
¿Alguna solución?
Gracias desde ya
Jose Luis
1 Respuesta
Respuesta de ohmygood
1