Change printers

  • Thread starter Thread starter Colin Hammond
  • Start date Start date
C

Colin Hammond

Can I write code to change the printer? I want to use a command button that
produces some information on A4 sheets and then produces an address label on
a label printer.

Colin
 
You don't mention what version\ of ms-access.

In access 2002 and later, there is a built in printer object, and it lets
you switch the printer with ease.

You can use:

Set Application.Printer = Application.Printers("HP LaserJet Series II")


So, to save/switch, you can use:

dim strDefaultPrinter as string

' get current default printer.
strDefaultPrinter = Application.Printer.DeviceName

' switch to printer of your choice:

Set Application.Printer = Application.Printers("HP LaserJet Series II")

do whatever....print reports...etc...

Swtich back.

Set Application.Printer = Application.Printers(strDefaultPrinter)


If you are using a earlier versions, then you can use my lightweight printer
switch code here:

http://www.members.shaw.ca/AlbertKallal/msaccess/msaccess.html
 
Thanks I should have mentioned that I am using Access 97 with windows XP
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Label printer sharing 1
ATTAC "On the Fly printing" prints only to default printer regardless of printer chosen in print dia 2
Epson XP-3150 not printing 2
Cheap Canon printers and self-sticking labels 2
Run Macro if Query is Not Null 4
Printer purchase help and advice 10
New printer recommendations 2
Change default paper size 3

Back
Top