Set zoom on startup

Question

I tried to write an AutoExec macro to set the zoom to 110% when Word starts. But it doesn't work:

Sub AutoNew()

'

' Set default zoom when Word starts

'

    ActiveWindow.ActivePane.View.Zoom.Percentage = 110

End Sub

How can I fix it?

Answer 1

Open the normal template.Set the zoom. Add a character to the text area. Delete it. Save and close the template. New documents based on the template will now always open at that zoom level.

---

<john9210> wrote in message news:*** Email address is removed for privacy ***...

Thanks Graham. The macros work fine for new documents (ctrl-n) and opening documents (file/open) but does not control the zoom on startup, that is when I double click winword.exe or its shortcut. What would be the macro for this?

John9210

---

Graham Mayor - Word MVP

www.gmayor.com

Posted via the Communities Bridge

http://communitybridge.codeplex.com/

Answer 2

I want to be able to double click the Word icon on my Desktop to start the program and have the blank sheet on screen zoomed to 110% .

Answer 3

If there is no document open, there can hardly be an ActiveWindow.ActivePane.

You could try changing your normal template to 110%.

Why do not have a document open?

---

Gerry Word MVP

Answer 4

I'm still trying to get Word to start to set the zoom to 110%

I wrote the following macro but it still doesn't work: I get the runtime error 4248: "This command is not available because no document is open".

Sub AutoExec()

'

' AutoExec Macro

'' Set default zoom when Word starts

    ActiveWindow.ActivePane.View.Zoom.Percentage = 110

End Sub

Answer 5

AutoNew runs each time you create a new document.

AutoOpen runs each time you open an existing document.

AutoExec runs when you start Word.