Question Locked

printer object access 2003

0 helpful
1 reply
Closed to new repliesThis discussion is closed. It stays readable, but it takes no new replies.

I am trying to force the printer objects properties prior to opoening a access 2003 report in preveiw mode. The properties do not seen to take effect.
here is what I am trying
Set LPRNTR = Application.Printers(lprinter)
Printer_Name = LPRNTR.DeviceName

LPRNTR.LeftMargin = 0.5 * 1440
LPRNTR.RightMargin = 0.5 * 1440
LPRNTR.TopMargin = 0.5 * 1440
LPRNTR.BottomMargin = 0.5 * 1440

LPRNTR.Printer.Orientation = acPRORLandscape
'Application.Printer.Orientation = acPRORLandscape

DoCmd.OpenReport StDocName, acPreview, , strFilter
Set Rpt = Reports("Fired Pills1")
Set Rpt.Printer = LPRNTR

the setting of the desired printer works, but the margins and orientation do not.

I can set up the margins in page set up but that is specific only to the computer at hand. The report gets run on several computers so I would like to control it in code. Help please.
Thanks

1 reply

This discussion is closed to new replies.