** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Tus Funciones Favoritas & Aportaciones & Artí­culos
  Mensajes nuevos Mensajes nuevos RSS - REPORTES: Dialogo previo imprimir informe
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoREPORTES: Dialogo previo imprimir informe

 Responder Responder
Autor
Mensaje
buho Ver desplegable
Administrador
Administrador
Avatar
Abuelo FELIZ

Unido: 10/Abril/2004
Localización: Valladolid
Estado: Sin conexión
Puntos: 11317
Enlace directo a este mensaje Tema: REPORTES: Dialogo previo imprimir informe
    Enviado: 10/Agosto/2013 a las 08:18
Una forma para que antes de imprimir un reporte, podamos escoger impresora, utilizando el propio cuadro de Windows (Comando .RunCommand acCmdPrint)

Este procedimiento se guarda en un modulo y puede ser llamado desde cualquier formulario, pasando como parametro el nombre del reporte a imprimir. Hay otras maneras de hacerlo, pero esta es bastante sencilla de entender y es efectiva.

va código
 
Public Sub ImprimeReportex(StrNombreReporte As String)
    If MsgBox( _
       "¿Imprimir definitivamente el reporte : " & StrNombreReporte & _
     " ? (SI/NO)", vbExclamation + vbYesNo, _
       "Imprimir Reporte") = vbYes Then
        On Error Resume Next
        With DoCmd
            .OpenReport StrNombreReporte, acPreview, , , acHidden
            .RunCommand acCmdPrint
            .Close acReport, StrNombreReporte
        End With
    End If
End Sub


Editado por buho - 10/Agosto/2013 a las 08:23
Expulsado de la cárcel por robar los barrotes
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable