You could do this with perhaps just one or two wildcard Find/Replace operations, where:
Find = *
Replace = 'nothing'
and you set the Find text's colour to 'Automatic' or 'Black' (ie the used colours that you don't want to keep).

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