You could do this with a wildcard Find/Replace, where:
Find = [\{]{1,}[!\}]@[\}]{1,}
Replace = nothing.
Depending on your regional settings, you may need to change the two {1,} strings to {1;}.

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