#1
|
|||
|
|||
Change Default Zoom Size to 'Page Width'
Hello,
I was wondering if I am able to change the default zoom size of my word documents from 100% to always open as 'Page Width' or 'Fit.' I tried under Format -> Document -> Page Setup -> Scale, but it does not allow me to type in 'Page Width.' Thanks for the help, Jason |
#2
|
||||
|
||||
To force a "Page Width" zoom on all documents, you'll need a couple of auto macros in the Normal template:
Code:
Sub AutoOpen() ActiveWindow.View.Type = 3 ActiveWindow.View.Zoom.PageFit = wdPageFitBestFit End Sub Sub AutoNew() ActiveWindow.View.Type = 3 ActiveWindow.View.Zoom.PageFit = wdPageFitBestFit End Sub
__________________
Stefan Blom Microsoft Word MVP Microsoft 365 apps for business Windows 11 Professional Last edited by Stefan Blom; 01-28-2012 at 11:25 AM. |
#3
|
|||
|
|||
Thanks for the response, but how do I enter this macro? Sorry!
|
#4
|
||||
|
||||
From within Word, press Alt+F11 to display the Visual Basic Editor. Click View | Project Explorer. Click the "Normal" project (= the Normal template). Click Insert | Module. Paste the code in my previous message into the module. Click the Save button. Exit the Visual Basic Editor and restart Word.
__________________
Stefan Blom Microsoft Word MVP Microsoft 365 apps for business Windows 11 Professional Last edited by Stefan Blom; 01-29-2012 at 05:40 AM. |
#5
|
|||
|
|||
Entering Page Width Macro
When I clicked on Project Explorer after Visual Basic Editor, it did nothing.
Here's what I all go to: Thanks again |
#6
|
||||
|
||||
Since you already have a module called "NewMacros," you can make use of that one. Double-click the module to open it and paste in the code from this thread.
__________________
Stefan Blom Microsoft Word MVP Microsoft 365 apps for business Windows 11 Professional |
#7
|
|||
|
|||
Same type of issue for 2007
My mother is visually impaired. I want to open and create office documents in a default zoom setting (300%). I looks like I need the proper macro to do this. Is it possible?
|
#8
|
||||
|
||||
Something like this should work:
Code:
Sub AutoOpen() ActiveWindow.View.Type = 3 ActiveWindow.View.Zoom.Percentage = 300 End Sub Sub AutoNew() ActiveWindow.View.Type = 3 ActiveWindow.View.Zoom.Percentage = 300 End Sub
__________________
Stefan Blom Microsoft Word MVP Microsoft 365 apps for business Windows 11 Professional |
#9
|
|||
|
|||
Thanks!
Wow! That was quick. This will work.
Could you point me in the direction of the macros I would need to do the same thing with Excel (I know that's a different ballgame) and Outlook? |
#10
|
||||
|
||||
You are welcome.
To learn about Excel and Outlook, you'd have to ask in Excel and Outlook forums, though.
__________________
Stefan Blom Microsoft Word MVP Microsoft 365 apps for business Windows 11 Professional |
Tags |
default zoom size |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Anyone ever seen this page width issue? New one to me... | MCSims | Word | 3 | 09-08-2011 02:09 PM |
Problem with zoom to "text width" | b0x4it | Word VBA | 3 | 05-29-2011 03:01 AM |
Word is inserting bold page-width lines without permission! | kozureokami | Word | 6 | 05-22-2011 02:59 PM |
Default Zoom in Excel 2003 | BradTinBC | Excel | 0 | 08-17-2009 11:27 AM |
Page opens at 175% zoom. How can I reset the default? | Renee Hendershott | Word | 2 | 01-22-2006 06:59 PM |