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

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

"Jim" wrote in message
...
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

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/200...e-elses-macro/

Hope this helps,

Hutch

"Jim" wrote:

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

Hi,

Try this in your code

ActiveWindow.Zoom = 70

Mike

"Jim" wrote:

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

Thankyou all! I always forget about recording macros.

"Harald Staff" wrote:

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

"Jim" wrote in message
...
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