Access - Mostrar Ventana Impresoras...

   
Vista:

Mostrar Ventana Impresoras...

Publicado por Lucho (22 intervenciones) el 02/03/2009 04:40:30
Bueno... para empezar voy a ir agradeciendo a todos los que siempre ayudan a tontos como yo!! Tengo el siguiente código:
Dim oApp As Excel.Application
Dim cuaderno As Excel.Workbook
Dim hoja As Excel.Worksheet

Set oApp = CreateObject("Excel.Application")
oApp.Visible = False
Set cuaderno = oApp.Workbooks.Open("C:Informes EstadisticaLibro1.xls")
Set hoja = cuaderno.Worksheets("Hoja1")
hoja.PrintOut
cuaderno.Close
Set cuaderno = Nothing
Set oApp = Nothing
'Only XL 97 supports UserControl Property
On Error Resume Next
oApp.UserControl = True
Bien... este código lo saqué de este foro, lo probé y funciona de muy bien. El hecho es que de esta forma se imprime en la impresora predeterminada. Yo necesito que se muestre la ventana impresoras para que el usuario pueda optar entre las distinas impresoras disponibles.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Mostrar Ventana Impresoras...

Publicado por Jefferson (381 intervenciones) el 03/03/2009 02:06:18
Espero te sirva

DoCmd.RunCommand acCmdPrint

Desde Venezuela
Jefferson
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar