|
|
#6
04-26-2021, 10:40 PM
|
||||
|
||||
As advised in the link, you should add the macro to a document with your new header. As advised in the link, in addition to that macro, you need add the GetFolder function from post#1 in the thread:
Code:
Function GetFolder() As String
Dim oFolder As Object
GetFolder = ""
Set oFolder = CreateObject("Shell.Application").BrowseForFolder(0, "Choose a folder", 0)
If (Not oFolder Is Nothing) Then GetFolder = oFolder.Items.Item.Path
Set oFolder = Nothing
End Function
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] 
|
| Tags |
| beginner, header and footer, word 10 |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
 Update Path of Field in Headers and Footers
|
lisa99 | Word VBA | 1 | 04-28-2020 02:51 PM |
| How to update Word 2016 custom mail merge fields in bulk? | dorian | Mail Merge | 1 | 09-23-2017 02:03 AM |
| Macro for find/replace (including headers and footers) for multiple documents | jpb103 | Word VBA | 2 | 05-16-2014 04:59 AM |
|
Adding different headers and footers in Microsoft word
|
camzie | Word | 4 | 08-22-2013 06:39 PM |
| Word 2008 for Mac Letterhead Template, headers and footers | haasro02 | Word | 0 | 12-15-2011 02:16 PM |
Windows 10 
Office 2016
Threaded Mode