How to zoom in VBA

[Jim]

I want to zoom the page out like 70% like when you go to View --> Zoom
-->70%. How do i write it in VBA? I know PageSetup has the zoom for printing,
I tried it but doesnt actually zoom the sheet. Any help will be much
appreciated! Thanks

 

[Harald Staff]

When in doubt of syntax, record a macro while doing it manually. You should
get a result like


Sub Macro1()
ActiveWindow.Zoom = 70
End Sub

HTH. Best wishes Harald

 

[Tom Hutchins]

Sub ZoomTo70()
ActiveWindow.Zoom = 70
End Sub

If you are new to macros), this link to Jon Peltier's site may be helpful:
http://peltiertech.com/WordPress/2008/03/09/how-to-use-someone-elses-macro/

Hope this helps,

Hutch

 

[Mike H]

Hi,

Try this in your code

ActiveWindow.Zoom = 70

Mike

 

[Jim]

Thankyou all! I always forget about recording macros.