如何创建批处理脚本以查找和替换多个文档中的页面

Question

I have created several Word Templates and Forms (over 100). If any form in a template changes, all like forms in other templates must be updated as well. For example, if another field is added to the form, then I need to update 100 templates with this same added field. So, let's say the templates are saved according to client:

Q://Master Templates/Client Name/Client Template

(Note, the client template may have about 30 or more pages - like a contract and the form might be page 29 in this client, but another client may have 60 pages and the form might be page 20).

Then, there is another folder where the form is a standalone form, or part of a group of forms that are used together. Example:

Q://Master forms/Group Forms
Q://Master forms/Standalone Forms

First question: would it make sense to have a batch script that finds the form in each template or each folder; and then should the script find add replace the extra field, or does it make more sense to replace the entire form in the templates?

Second question: how would / could I do this? Is there a way to write the script to replace the form in each location based on the example above?

Third question: what types of security risks or problems such a batch script can create for an enterprise-wide network?

Thank you in advance for your support.

Answer 1

Probably the best answer is to use the Developer ribbon in Word. Within Word, File > Options > Customize Ribbon > Check the Developer item under Main Tabs.

Next, open one template needing changes and click Record Macro then make your changes.

Now you can open (In Windows Explorer, ctrl + click then right click to open multiple files) the other templates needing the changes and replay the macro to make those changes.

You could even record opening another document then just add the VBA code to open the other templates and play back the recorded macro to make the changes.

Here's the VBA to open a document in Word.

ChangeFileOpenDirectory "C:\Users\Administrator\Documents\"
Documents.Open FileName:="My File.docx"

Now once you get at least something partial, post back and we can help refine that.