Saludos.

Usando el gravador de macros he obtenido esto:

sub Mainprint
dim document   as object
dim dispatcher as object
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dim args1(2) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Copies"
args1(0).Value = 1
args1(1).Name = "Collate"
args1(1).Value = true
dispatcher.executeDispatch(document, ".uno:Print", "true", 0, Args1())
end sub

El imprime en el impresor por omisión

Sucede que necesito detener para mostrar la ventana de diálogo 
Archivo>Imprimir,  para que el usuario continue con 'el aceptar', pero que por 
omisión aparezca elegida la página 1

Lo anterior porque estoy  colocando el cuadro de datos en la hoja 1 para 
facilitar la impresión por medio de la página 1.   Hay varios impresores 
disponibles y no todos funcionan a la vez, por eso necesito que salga la 
ventana para que elijan el impresor y "aceptar".

Gracias por las ayudas!
Atte. Alejandro


       
---------------------------------

Enviado desde Correo Yahoo!
Disfruta de una bandeja de entrada más inteligente..
  

Responder a