You could use a wildcard Find/Replace, where:
Find = ([A-Za-z]){2,}
Replace = \1
Do note that this will also change valid words, like 'committee' to 'comite'...

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]