Fit to page
 

In XL: Choose File/Page Setup and in the Page tab, click the Fit to:
radio button.

VBA:

With ActiveSheet.PageSetup
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With



In article ,
"Theo Haesevoets" wrote:

In lotus was a possibility while printing to fit all to a page

Exist this possibility also available in Excel

How you do this in VBA

Theo