検索する文字列 ([\!-~]) オプション：ワイルドカード 書式：特定のフォントを指定置換後の文字列 \1 書式：特定のフォントを指定 Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "([\!-~])" .Fon…

置換で曖昧検索オプションを外す。 検索する文字列 ^$置換後の文字列 ^& 置換後の文字列の書式でフォントを目的のフォントに設定。このうえですべて置換をする。 Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection…