Batch change Word document properties?

[sjagers]

I read Justinlabenne's macro about batch changing Excel document properties and was wondering if a macro existed that could change document properties (specifically Author and Company names) for several WORD documents in a folder?

[mdmackillop]

Hi sjagers
Welcome to VBAX
There's a KB item here (http://vbaexpress.com/kb/getarticle.php?kb_id=76) which demonstrates looping through all file in a folder. To change the required properties would use
'this is where a macro would be that would actually do something
Sub DoWork(wdDoc As Document)
With wdDoc
.BuiltInDocumentProperties("Author") = "Bill"
.BuiltInDocumentProperties("Company") = "Ted"
End With
End Sub

If you need further assistance, just let us know.
Regards
MD

[kerl]

FYI, there is also a cool software called Doc Scrubber which erases most of such meta data. Its only short coming is that it cannot process subfolders.


I read Justinlabenne's macro about batch changing Excel document properties and was wondering if a macro existed that could change document properties (specifically Author and Company names) for several WORD documents in a folder?