replace DOT with new path in many files

[Jason Dulberg]

We have hundreds of .doc files on the server that are referencing old UNC
paths. This is causing the files to load quite slowly as the path no longer
exists. Is there a way to alter the paths across all the files rather than
doing it manually?

Any suggestions would help.

Thanks!

Jason

 

[Suzanne S. Barnhill]

See http://word.mvps.org/faqs/macrosvba/DSOFile.htm

 

[Jason Dulberg]

I was able to get the document properties to display using that tutorial
however how would I go about going into the file and changing the dot file if
it has an incorrect UNC path?

Thanks again

Jason

 

[Suzanne S. Barnhill]

See http://word.mvps.org/FAQs/MacrosVBA/BatchFR.htm or
http://www.gmayor.com/batch_replace.htm

 

[Jason Dulberg]

I ran the macro's you suggested however they replace text within the document
but doesn't alter its properties. I attempted to add the following but it
does not work.

Set myDoc = Documents.Open(PathToUse & myFile)
myDoc.BuiltInDocumentProperties(wdPropertyTemplate) = ""

I used the code from http://www.gmayor.com/batch_replace.htm

Thanks again

Jason

 

[Suzanne S. Barnhill]

I suggest you post your question in one of the word.vba NGs, where you will
find more users who will be able to help you adapt these macros.