Print setup

[JUDO]

Dim stDocName As String

stDocName = "SupplierTbl03rpt"
DoCmd.OpenReport stDocName, acViewPreview, "", True

In a runtime version of a database I have the above code linked to a button on a form. Is it possible by altering or replacing the above code to make the system go into print setup instead of just printing the document?

 

[___]

Is this what you need?

HTH

 

[JUDO]

Printing Problems

The code you attached doesn't cover the function we require, sorry. Any other ideas I need it to go into print setup to select printers/pages as it does when you print a document in Word or Excel. Any other ideas??

 

[namliam]

i am not sure if it can be done at runtime but 1 thing for sure. Just to clear up your command

DoCmd.OpenReport stDocName, acViewPreview

The True-where condition- and ""-filter- are unnecessarry and should not be used this way.

Regards

 

[JUDO]

Thanks

Thanks for you help. I live in hope of seeing a bright light at the end of the tunnel.

 

[Rich]

stDocName = "SupplierTbl03rpt"
DoCmd.OpenReport stDocName, acViewPreview
DoCmd.RunCommand acCmdPrint