Access & VBA FAQ
| | | |
Indice de temas
Tablas
Consultas
Formularios
Informes
Macros
Módulos
Base de datos
Miscelánea
API
Utilidades
Problemas
Cadenas
Fechas
Todos los temas
Informes : Opciones de impresión a través de código
Autor/es:
Juan M Afán de Ribera
Pregunta : Se cómo imprimir un informe mediante código y sé cómo hacer para que aparezca el cuadro de diálogo imprimir, de manera que el usuario pueda escoger diferentes opciones, como pueden ser el número de copias a imprimir, de qué página a qué página, etc. Pero ahora me encuentro en la necesidad de tener que configurar esas opciones de impresión mediante código, sin interactuar con el usuario. ¿Es posible hacerlo?
Respuesta : Sí, sí que es posible. Existe un método en el objeto DoCmd llamado PrintOut que nos da esa posibilidad de la que hablas. En la ayuda para VBA de Access viene bien explicado cómo funciona. Puedes buscar por PrintOut o bien por la acción de macro Imprimir. En ésta última, tal vez se den más detalles de su funcionamiento.
Ejemplo de uso:
    On Error GoTo err_PrintOut
    ' paramos la actualización de pantalla
    Application.Echo False
    ' abrimos el informe en vista previa
    DoCmd.OpenReport "Informe1", acViewPreview
    ' imprimimos 2 copias de las páginas 2 a la 3,
    ' en calidad borrador
    DoCmd.PrintOut acPages, 2, 3, acDraft, 2
    ' cerramos el informe
    DoCmd.Close acReport, "Informe1"
    ' activamos la actualización de pantalla
    Application.Echo True
    On Error GoTo 0
    
    ' si ejecutamos este código desde una función
    ' la siguiente línea debería ser Exit Function
    Exit Sub
  
err_PrintOut:

        MsgBox "Se ha producido el error " & Err.Number _
        & vbCrLf & Err.Description

Ejemplos:

 

Temas relacionados:

Escoger impresora para informe

 

Última actualización: 21/12/2004