Change Default Zoom

G

geek_girl

Hi Guys,

I'm trying to create a public procedure to change the default zoom of
spreadsheets. I tried the following however it returns the object not
supported error:

Public Sub AutoOpen()
ActiveWindow.ActivePane.View.Zoom.Percentage = 200
End Sub

Your help will be greatfully received.

Cheers,

Amie
 
Top