Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Imprimir en Access

11 views
Skip to first unread message

Xavier Puy

unread,
Apr 11, 2002, 8:44:25 AM4/11/02
to
Hola.

Tengo un problemilla con Access97.

Quiero añadir un botón para imprimir un informe filtrado:

Docmd.OpenReport "lkllkjlkj",,, etc.

El problema está en que quiero que me abra el cuadro de
dialogo de impresoras, selecionar impresora y al hacer
click en botón aceptar que lo imprima.

Help.

Pagaag

unread,
Apr 11, 2002, 10:39:56 AM4/11/02
to
Interesante cuestion la que planteas y creo que tiene solucion, si uno se lo
curra un poco.-
Yo no lo tengo hecho, pero intuyo que se puede hacer.
Juan M. Afan de Ribera (Happy) está currandose el tema de las barras de
menu etc de Access.
Tambien sé que con
DoCmd.RunCommand acCmdPrint
se abre el dialogo de la impresora y si pulsas aceptar, creo, se imprime el
objeto activo que esté en pantalla en esos momentos.-
Una posible solucion, sería llamar al Repor en vista previa y desde el
Report activar la orden
DoCmd.RunCommand acCmdPrint
No lo he probado, pero a lo mejor hasta funciona.

Lo que decía, que Happy se está currando el tema de las barras de
herramientas.
¿Y a que viene todo esto?
Pues que mediante una forma muy ingeniosa, es capaz de capturar desde código
cualquier botón o menú que tenga Access en su barra de herramientas. Y en
concreto, capturar el de la Impresora del menu archivo, que hace lo mismo
que el DoCmd.RunCommand acCmdPrint. Es decir, presenta el dialogo previo y
se das Aceptar, pues te imprime el objeto activo.

Prueba a ver con DoCmd.RunCommand acCmdPrint y ya nos contarás si sacas algo
en claro.
Un saludo

Francisco García Aguado
"Xavier Puy" <infor...@ecisabcn.com> escribió en el mensaje
news:0f5c01c1e156$9ca91bd0$a5e62ecf@tkmsftngxa07...

McPegasus

unread,
Apr 12, 2002, 3:14:29 AM4/12/02
to

Pagaag

unread,
Apr 12, 2002, 3:45:02 AM4/12/02
to
Yepaaaaa¡¡¡¡¡¡¡¡¡¡¡
Cogido, visto y anotado.
Gracias muchas.
Francisco García Aguado
"McPegasus" <XXmcp...@iespana.es> escribió en el mensaje
news:OYgF4If4BHA.1632@tkmsftngp02...

Xavier Puy.

unread,
Apr 12, 2002, 5:51:06 AM4/12/02
to
Mil gracias por esta solución.

Un saludo.

>-----Mensaje original-----

>.
>

0 new messages