• 締切
  • すぐに回答を!

エクセルの使い方について

  • 質問No.5733682
  • 閲覧数51
  • ありがとう数3
  • 回答数1

お礼率 37% (36/95)

質問です。
エクセル表で一つのセルの最初の1文字のアルファベットのみ、フォントの字体に変更したいのですが、複数のセルを同様に同時に変更したいのです。

文章はMSPゴシックにアルファベットはBLAにしたいのです。
→  A.(BLA)あいうえお(MSPゴシック)
複数のセルを一度に変更は可能でしょうか?

回答 (全1件)

  • 回答No.1

ベストアンサー率 50% (379/747)

こんな感じでしょうか?
フォントの正確な名前がわからないので
MS P明朝としていますので
変更してくださいね

Sub test()
Dim Rng As Range
For Each Rng In Selection
If Rng.Value <> "" Then
Rng.Characters(Start:=1, Length:=1).Font.Name = "MS P明朝"
End If
Next Rng
End Sub

参考まで
関連するQ&A
ページ先頭へ