Printing Userforms [Landscape]
Can anyone assist
I have many userforms which at regular intervals will need to be printed, some are to be printed in Portrait others in Landscape. It prints find in Portrait, but how can I change the settings so that it prints in Landscape, I tried the following to no avail by showing the Dialog Printer SetUp and manually changing the setting to Landscape but this still doesn't work. any ideas? Sub Print_UserForm Dim Response as boolean With ufStock_Sheet Response = Application.Dialogs(xlDialogPrinterSetup).Show If reply = False Then Exit Sub .printform End With End sub |
Printing Userforms [Landscape]
Tom Ogilvy has posted this a few times:
http://groups.google.co.uk/group/mic...389691 309003 or http://snipurl.com/14p7q leerem wrote: Can anyone assist I have many userforms which at regular intervals will need to be printed, some are to be printed in Portrait others in Landscape. It prints find in Portrait, but how can I change the settings so that it prints in Landscape, I tried the following to no avail by showing the Dialog Printer SetUp and manually changing the setting to Landscape but this still doesn't work. any ideas? Sub Print_UserForm Dim Response as boolean With ufStock_Sheet Response = Application.Dialogs(xlDialogPrinterSetup).Show If reply = False Then Exit Sub .printform End With End sub -- Dave Peterson |
All times are GMT +1. The time now is 04:09 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com