Access - Imprimir informe teniendo varios impresoras

 
Vista:

Imprimir informe teniendo varios impresoras

Publicado por John (32 intervenciones) el 02/08/2010 20:28:08
Hola a todos.;

quiero hacer un boton, al pinchar sobre el que me haga la vista previa de un informe llamado clientes y que me imprima en la impresora llamada PDFCreator, porque tengo varias impresoras instaladas y no quiero utilizar la impresora predeterminada.

Esto quiero hacer para que me crea un informe pdf y no quiero poner esta como la impresora predeterminada.

Como seria el codigo ?

En espera de vuestra ayuda un saludo.

John
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:Imprimir informe teniendo varios impresoras

Publicado por 2PL (461 intervenciones) el 04/08/2010 13:47:49
Te creas una tabla con estos dos campos (impresora texto) (asignar campo si/no) y metes las impresoras que tengas y marcas la que quieras.
ejemplo

impresora asignar
Adobe PDF No
HP DeskJet 720C No
IR C2380 No
hp LaserJet 1320 PCL 5e Sí es la que he asignado
Epson FX-880 No

en el evento "Al abrir" del formulario principal o donde quieras, pones este codigo

Dim ImprActiva As String
Dim ImprN As Printer
' Establecer la impresora especifica que está asignada en la tabla "Impresoras"
ImprActiva = Nz(DLookup("impresora", "Impresoras", "asignar"), "")
If ImprActiva = "" Then
MsgBox "No tiene impresora asignada para los informes"
Exit Sub
Else
For Each ImprN In Application.Printers
If ImprN.DeviceName = ImprActiva Then
Set Application.Printer = ImprN
End If
Next
End If

Saludos desde Cádiz
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