Wordのマクロでフォントの置換

Wordのマクロで異なる複数の単語のフォントが変更できるマクロはありませんでしょうか?
例えば「$1$」という文字列を$を削除してHelveticaの1に置換という具合です。
この文字列が十数種類ありますので、できれば一括で作業できればと考えています。
ご存知の方がいっらしゃったらご教授下さい。
よろしくお願いいたします。
» 001
これはいいなんでも掲示板ですね
» 002
*http://www2.moug.net/bbs/mougle/

昔、このボードを参考にさせてもらいました。001の上野書き込みじゃないけれど、DTP駆け込み寺には微妙かな。まずは、ググってみましょうね。
» 003
「上野」じゃなくて「上の」ですね。すみません。