こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

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

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

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

投稿日時 - 2010-03-07 22:40:19

QNo.5733682

すぐに回答ほしいです

このQ&Aは役に立ちましたか?

3人が「このQ&Aが役に立った」と投票しています

回答(1)

ANo.1

こんな感じでしょうか?
フォントの正確な名前がわからないので
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

参考まで

投稿日時 - 2010-03-08 00:51:52

あなたにオススメの質問