再び、エクセルでセルに数字が入力されていて、その入力されている数によってセルの色を一括で変えるよい方法はないでしょうか？条件付書式ではなく、直接そのセルの書式を書き換えたいのですが。後でそのセルの色を他のシートに貼り付けたいので、条件付書式ではセルの

Question

18

50pt

文字列が変わると色まで変わってしまうので貼り付けられません。

回答の条件

※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。

	回答者	回答	受取	ベストアンサー	回答時間
1	turoo	148回	130回	0回	2004-07-16 22:23:24
1	turoo

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

回答リクエストを送信したユーザーはいません

turoo · Answer 1 · 2004-07-16T22:16:42+09:00

IF関数とか使ってみてはいかがでしょう？

あれ？色は変えられないんだっけか・・・？

pi12345 · Answer 2 · 2004-07-16T22:21:21+09:00

はてな

やっぱりVBAですかね。

サンプルを載せておきますので、セル範囲や色の部分はお好みに調整して下さい。

−−−−

Private Sub Worksheet_Calculate()

For Each C In Range(”A1:A100”)

Select Case C.Value

Case ”Ａ”

C.Interior.ColorIndex = 22

Case ”Ｂ”

C.Interior.ColorIndex = 36

Case ”Ｃ”

C.Interior.ColorIndex = 20

Case ”Ｄ”

C.Interior.ColorIndex = 25

Case Else

C.Interior.ColorIndex = 0

End Select

回答（3件）