あらかじめセルの書式設定で英字フォントを指定していても、ある条件の元ではそれ以前に指定していた、または標準の日本語フォントに変わってしまう場合があります。それは日本語を含んだ文字列を以前そのセルに入力した時です。例えば、「Verdana」のフォントを書式設定したセルに(a)初めから「Excel」と入力していた場合と、(b)「エクセル」と日本語フォントで入力した後に「Excel」と入力する場合では結果が違います。

これを避けたければセルに入力があるたびに変更のあったセルに対してフォントを自動で設定するようにしてみましょう。下の例ではフォントを「Verdana」に設定しています。

特定のワークシートでのみ動作させる場合は、そのワークシートモジュール内に以下のプロシージャを記述します。

Private Sub Worksheet_Change(ByVal Target As Range)
  Target.Font.Name = "Verdana"
End Sub

すべてのワークシートで動作させる場合は、ワークブックモジュール内に以下のプロシージャを記述します。

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
  Target.Font.Name = "Verdana"
End Sub