![]() With ActiveDocument.Sections(J).Headers(wdHeaderFooterFirstPage) With ActiveDocument.Sections(J).Headers(wdHeaderFooterPrimary) ' document is now active, check all sectionsįor J = 1 To ' open the file based on its index position ' if more than one match, execute the following code FileName = "*.docx" ' file pattern to match SearchSubFolders = True ' search the subfolders ![]() LookIn = "C:\MyStuff\" ' where to search This can be done with a macro like the following: All you need to do is put all the documents in a folder and then use the macro to search through the folder, open each document, remove the graphic, and save each document. She is looking for a way to remove all those graphics without the necessity of opening and modifying each document manually.įortunately this can be handled by creating a macro. Rosario has a huge number of documents (about 44,000 of them), each of which contains a graphic in the header.
0 Comments
Leave a Reply. |