|
|
#6
03-06-2012, 03:31 AM
|
||||
|
||||
OK, if you add the following code to the Normal template's 'ThisDocument' module, you should get the desired prompt:
Code:
Option Explicit
Private Sub Document_New()
Call Document_Open
End Sub
Private Sub Document_Open()
If MsgBox("Go to Footer?", vbYesNo, "Destination Selector") = vbYes Then
ActiveWindow.ActivePane.View.SeekView = wdSeekPrimaryFooter
End If
End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] 
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
 Macro to save as pdf with ability to choose save as folder
|
rvessio | Word VBA | 4 | 07-25-2016 12:37 PM |
|
How to choose scale effect for Formatting Palette?
|
schwine | Excel | 1 | 04-09-2011 11:23 PM |
| How to choose scale effect for Formatting Palette? | schwine | Word | 0 | 04-02-2011 09:11 AM |
| Choose Folder for GMail or Pop3 account to go to | datagopher | Outlook | 1 | 10-14-2010 10:55 AM |
| Unable to choose Address books | Hyneso | Outlook | 0 | 08-11-2010 03:39 PM |
Windows 7 64bit 
Office 2010 32bit
Threaded Mode