You don't need a macro for that - you can use a wildcard Find/Replace, where:
Find = ([A-Z]).*[Aa]nswer*( is[ in]{1,3}correct.)
Replace = Answer (\1)\2
Of course, you could incorporate it into a macro such as the last one I gave you ...
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
|