Thread: Cannot get VBA to Change PageSetup.FitToPagesWide = 1
View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.misc
[email protected] EagleOne@discussions.microsoft.com is offline
external usenet poster
  
Posts: 391
Default Cannot get VBA to Change PageSetup.FitToPagesWide = 1
Ron,

As usual the fix-it-man rules again. Is a pleasure to see you active after all you have done over
the years for the art of Excelling.

Thanks EagleOne

"Ron de Bruin" wrote:

Add Zoom

With ActiveSheet.PageSetup
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
ActiveSheet.PrintOut
Reply With QuoteReply With Quote