Macro for Page Setup - Fit to one page

Y

Yogesh Gupta

I am using following macro to print fit to one page. But it is not happening
and print is actually running on two pages.

With ActiveSheet.PageSetup
.PrintTitleRows = ""
.PrintTitleColumns = ""
.Orientation = xlLandscape
.LeftFooter = "Left Footer text: "
.RightFooter = "Right Footer Text: "
.FitToPagesWide = 1
.FitToPagesTall = 1
End With

Can any one help me understand the reason why I am not able to get print fit
to single page and what change do I need to make to my code.
 

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

Page Breaks in VBA Q 6
Page numbering with Merged Document and IF statements 1
Printing multi-page and multi-orientation excel tab to PDF 0
Page set up for all worksheets 7
Print area - selection 4
Space at end of multi page list to accommodate new entries 1
Printing Setup help 9
fit to one page 1

Top