Cuadros de Diálogos integrados

31/05/2005 - 00:00 por JLMorales | Informe spam
Hola Grupo de Noticias:

Tengo mi libro de excel prácticamente automatizado. Ahora estoy en la fase
de impresión de reportes y quiero que cuando oprima un commandbotton se
configure y prepare la hoja activa para imprimir. Para ello he utilizado el
objeto .PageSetup con sus respectivas propiedades, margenes, orientación,
tipo de papel.

Pero quiero tambien que posteriormente a eso, se abra el cuadro de dialogo
de impresión, y lo puedo hacer de dos formas

Application.Dialogs(xlDialogPrinterSetup).Show ó
Application.Dialogs(xlDialogPrint).Show

Prefiero usar la segundo, pero deseo establecer parámetros por default
(personalizados) cuando uso solamente mi libro. Microsoft Excel tiene Listas
de argumentos de cuadros de diálogo integrados y yo necesitaría la siguente
constante:

xlDialogPrint

a la que le corresponde la siguiente lista de argumentos:

range_num, from, to, copies, draft, preview, print_what, color, feed,
quality, y_resolution, selection, printer_text, print_to_file, collate

segun la ayuda de EXCEL

La pregunta ¿cómo aplicar dichos argumentos?
Lo que quiero es definir desde mi libro que se impriman por omisión 2 copías
en la bandeja manual, que no permita la presentación preeliminar, que no
premita imprimir en un archivo por poner un ejemplo.

¿cómo lo hago?, Pues si yo uso desde mi PoyectoVB hago lo siguiente:

Application.Dialogs(xlDialogPrint).Show y despues de Show abro un "(" me
muestra una lista de arg1, arg2, arg3.")" hasta los necesarios por cada
cuadro de dialogo y lo define como "as bolean"
pero no, no consigo aplicar esto.

gracias y saludos al grupo

bytes
 

Preguntas similares