エクセルで、大きな数字を自動的に大きな文字に変更させたい

質問

エクセル　2003で、金額の大きなセルは、その数字に比例させて隣の日本語（課目とか）が入ったセルの、文字サイズを大きく表示させたい。
条件付書式　を設定する以外で、何か良い方法は無いでしょうか？
数字が変わると、文字サイズも自動的に変化するようにしたいです。

回答No.2

DIooggooID · ベストアンサー

条件付書式設定以外の方法では、VBAのイベント（ある特定のセルの内容が変更された場合に処理するマクロ命令）を利用して実現することになると思います。

※下記の事例では、C2からC6の間のセル値が変更されたら、その右隣セル文字のサイズを変更します。
　・１００以上の値なら 24サイズに、それ以外なら 11サイズに。

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 Or Target.Row > 6 Then Exit Sub
If Target.Column <> 3 Then Exit Sub
If Target.Value >= 100 Then
With Target.Offset(0, 1).Font
.Size = 24
End With
Else
With Target.Offset(0, 1).Font
.Size = 11
End With
End If
End Sub

お礼

高度な、回答をありがとうございます。

私には、宇宙語なので、マクロのわかる人に、教えていただいた内容を伝えて、組んでもらいます。
ありがとうございました。

回答No.1

hideki1976

条件付書式が一般的なやり方だと思います。
なぜ使いたくないのか？の説明がないとアドバイスし辛いです。

補足

すみません。
条件付書式では、フォントサイズが選べないみたいなので、、、