The following will fix most of that, but you'll still need to fix any trailing apostrophes (which will now be converted to s”):
Find = ^0146^32
Replace = ^0148^32
After you've done that, you can manually check the s” strings - some of which probably should be s’ - via:
Find = s^0148

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