Write a line in you document for example
Hello this is MYSELF writing this
and then run this little piece of code
For Each wrd In ThisDocument.Words
teststr = wrd ' store original word
If UCase(wrd) = teststr Then ' compare this word with a capitalised version and if same
MsgBox "Word is in capitals" ' display message box
This goes throught each word of the document and sees if it is in capitals by comparing the original word with a capitalised version. If it is then a message will be display.
Having done this then you can see if it is your exception list.
Start with this anyway, I'm sure you figure the rest out.
If not just post back