サンプルコードでできること
選択したテキストをMSゴシック、Arialに変更します。
コードの説明
.NameFarEast = "MS ゴシック" .Name = "Arial"
NameFarEastプロパティで日本語フォント、Nameで英数字フォントを指定します。
Sub 選択フォントの変更() With Selection.Font .NameFarEast = "MS ゴシック" .Name = "Arial" End With End Sub
選択したテキストをMSゴシック、Arialに変更します。
.NameFarEast = "MS ゴシック" .Name = "Arial"
NameFarEastプロパティで日本語フォント、Nameで英数字フォントを指定します。
Sub 選択フォントの変更() With Selection.Font .NameFarEast = "MS ゴシック" .Name = "Arial" End With End Sub