Cómo hacer mediante programación que una consulta en MS Access esté predeterminada en horizontal cuando se imprime

Question

¿Cómo puedo hacer mediante programación que una consulta en MS Access esté predeterminada en horizontal cuando se imprima, específicamente cuando la veo como un gráfico dinámico?Actualmente estoy intentando esto en MS Access 2003, pero me gustaría ver una solución para cualquier versión.

Answer 1

La siguiente función debería funcionar:

Function SetLandscape()
   Application.Printer.Orientation = acPRORLandscape
End Function

Debería poder llamar a esto desde la función autoexec para garantizar que siempre se ejecute.

Answer 2

Sí, la llamada de ahockley establece la orientación de la impresora de la aplicación en horizontal.Probé un experimento y funcionó bien.Sé que esto no produce una tabla dinámica, pero no configuré una para usar, por lo que se abre e imprime una consulta normal.

Private sub
    Application.Printer.Orientation = acPRORLandscape
    DoCmd.OpenQuery "qry1", acViewNormal, acReadOnly
    DoCmd.PrintOut acPrintAll
End Sub

Si desea cerrar la consulta después de imprimirla, agregue:

docmd.Close acQuery, "qry1", acSaveNo