Asociar impresora a Informe Access 2007

[Jaime]

Buenos días a tod@s,

Tengo una aplicación en Access 2007 y no consigo asociar una impresora
a los informes. Esto es, cuando entro en configuración y le digo que
el informe de tickets salga por la posiflex, aunque grabe los cambios
hace caso omiso, y sale por la impresora predeterminada, una epson
normal (A4).

[Patxi Sanz]

Hola Jaime:

Supongo que te refieres a que intentas asignar la impresora teniendo el
formulario abierto en vista Dise�o.

En versiones anteriores (en 2007 no s� si pasar�), hab�a que modificar
cualquier otra cosa del informe (una propiedad, un control, ...) para que al
guardar se guardara tambi�n la impresora escogida.

Otra posibilidad es usar el objeto Printer del informe para asignar la
impresora deseada por c�digo.

--
Un saludo,

Patxi Sanz
Tudela (NA)
http://www.pasa.es.tt/

[Fernan]

�Como se podr�a usar el objeto PRINTER del informe para asignar la impresora
por c�digo?
muchas gracias

"Patxi Sanz" <patxisanz[ARROBA]yahoo[PUNTO]es> escribi� en el mensaje
news:655ED81B-E77E-48F6...@microsoft.com...

[Patxi Sanz]

Revisa esto del maestro Juan M. Af�n:

- http://accessvbafaq.mvps.org/item.asp?pagina=75

Tambi�n tienes m�s info del objeto en la ayuda de VBA.

[Jaime]

Muchísimas gracias a todos por vuestra aportación. Al final, he
encontrado una solución, que sale de la ayuda de Access 2007. Os la
adjunto por si os es de utilidad:

Primero, compruebo cuantas impresoras hay instaladas en el sistema, y
la posición en el array de la colección de impresoras:

'Se convierte la impresora que necesitamos de la colección Printers en
la impresora predeterminada del sistema

Dim prtDefault As Printer

'Averiguamos la posición de la impresora
Dim cont As Long

cont = 0
While cont < 11 'En mi PC tengo 11 impresoras instaladas.
Set Application.Printer = Application.Printers(cont)

Set prtDefault = Application.Printer
With prtDefault
MsgBox "Posición: " & cont & vbCr & " Device name: "
& .DeviceName & vbCr _
& "Driver name: " & .DriverName & vbCr _
& "Port: " & .Port
End With

cont = cont + 1
Wend

'FIN - saber posición de la impressora

'*****************************************************************************************************
'Cuando ya sabes la posición que ocupas, dejarás habilitadas sólo las
siguientes líneas:

Set Application.Printer = Application.Printers(0) 'POSIFLEX

Set prtDefault = Application.Printer

DoCmd.OpenReport "infTicket", acNormal, , strNumTick 'strNumTick : Le
paso el núm. de ticket para que imprima éste sólo

'*****************************************************************************************************

En el evento "cerrar" del informe del ticket, vuelvo a poner como
predeterminada la impresora normal de turno.

Saludos,

Jaime
in...@cr-data.com
www.cr-data.com

[PJuan]

Estoy con lo mismo que tu, pero voy un poco mas avanzado.
Tengo unos combos donde recojo las impresoras que tengo en el sistema, y
guardo en una tabla la que quiero para tickets y la que quiero para
facturas.
Despues al imprimir tickets pongo como predeterminada la que he seleccionado
para tickets...
Aun estoy haciendo pruebas, pero te envio a tu correo un peque�o ejemplo de
mis progresos. (Te lo envio a tu correo porque creo que aqui no se pueden
poner adjuntos)
Saludos

"Jaime" <jrj...@gmail.com> escribi� en el mensaje de
noticias:0453513a-0677-40d9...@k19g2000yqc.googlegroups.com...
> Buenos d�as a tod@s,
>
> Tengo una aplicaci�n en Access 2007 y no consigo asociar una impresora
> a los informes. Esto es, cuando entro en configuraci�n y le digo que