![]() |
|
#4
|
||||
|
||||
|
Something like this would do the trick:
Code:
Sub SetSinglePageView() On Error GoTo errhandler ActiveWindow.View.Type = 3 'Print Layout ActiveWindow.View.Zoom.PageColumns = 1 ActiveWindow.View.Zoom.Percentage = 100 'specify the zoom you want errhandler: Exit Sub End Sub You'd have to add the macro to the Normal template and also call the macro from Sub AutoOpen() and Sub AutoNew() in the Normal template.
__________________
Stefan Blom Microsoft Word MVP Microsoft 365 apps for business Windows 11 Professional |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
When I click any pages,word automatically view first page
|
Onrzcan | Word | 3 | 07-01-2016 07:42 AM |
| Within a table format, a single cell can't automatically flow to the next page? | laurieli | Word | 3 | 12-09-2015 07:09 PM |
Print preview does not show all the columns in Page View
|
Patben | Excel | 1 | 11-11-2015 05:04 AM |
| How do I create a table in Word where I can single click a cell and it automatically highlights? | QA Inspector | Word | 2 | 05-14-2015 07:22 PM |
How do you view a single page
|
delboy | Word | 29 | 01-25-2013 06:42 PM |