How to perform a bulk edit of headers and footers of multiple Word documents

Question

I wish to use VBA to perform a bulk edit of headers and footers of multiple (1000+) Word documents. The header/footer of the first page would differ from the headers/footers of all other pages.

I have found an excellent VBA posted by Paul Edstein, Fmr MS MVP - Word, at https://www.msofficeforums.com/word-vba/44347-batch-change-footer-multiple-files-footer-another.html

Paul's VBA performs an editing of headers/footers of Word documents stored in a folder, by copying the headers/footers of the Word document where the VBA is stored. This VBA works well, but results in the same header/footer for all pages, whereas I need the headers/footers of all subsequent pages to differ from the first page.

Please help me to understand what changes could be performed in the VBA that would permit the bulk editing of headers and footers in multiple Word documents, resulting in the header/footer of the first page differing from the headers/footers of all other pages.

 

Thank you,

Rich

Paul's VBA is shown here: