エクセルの条件付き書式。3段階以上設定する方法は？

OS=WIN10
エクセル2002です


エクセルでテストの集計をしています
偏差値を求め、偏差値を5段階に分類しそれぞれセルの地の色を変えたいと思います
下記のような感じです
偏差値　65以上99未満　赤色
偏差値　55以上65未満　オレンジ色
偏差値　45以上55未満　黄色
偏差値　35以上45未満　水色
偏差値　01以上35未満　青色

条件付き書式の設定で可能だとおもっていたら条件付き書式は3段階までしか設定できません
これを5段階まで増やす方法はあるでしょうか？
ないならば、別の方法で類似の結果を出す方法はあるでしょうか？

No.3 ベストアンサー 回答者： tom04 回答日時： 2020/06/10 16:08

No.2です。

＞関数のIF文の入れ子構造で・・・
関数で処理するとしても「TRUE」の場合しか対応できませんので、
結局色の数だけ条件付き書式が必要です。
Excel2003以前の場合はどうしてもVBAになってしまうのではないでしょうか。

苦肉の策でうが、別列に評価を表示すてはダメですか？

↓の画像ではC2セルに
=IF(B2="","",VLOOKUP(B2,E:F,2,1))
という数式を入れフィルハンドルで下へコピーしています。

※　この程度しか思いつきません。
お役にたてなかったらごめんなさい。m(_ _)m

この回答へのお礼

ご解答ありがとうございます。
ベストアンサーにします

お礼日時：2020/06/13 16:21

No.2 回答者： tom04 回答日時： 2020/06/10 09:53

こんにちは！

No.1さんが回答されている方法そのままですが・・・
↓のコードをシートモジュールにしてみてください。

尚、C列2行目以降を対象としていますので、
範囲は実情に合わせてください。

Private Sub Worksheet_Change(ByVal Target As Range) '//この行から//
　If Intersect(Target, Range("C:C")) Is Nothing Or Target.Count > 1 Then Exit Sub '//←C列を対象①//
　　With Target
　　　If .Row > 1 Then '//←2行目以降が対象//
　　　　If .Value <> "" Then
　　　　　Select Case .Value
　　　　　　Case Is < 35
　　　　　　　.Interior.ColorIndex = 5
　　　　　　Case Is < 45
　　　　　　　.Interior.ColorIndex = 28
　　　　　　Case Is < 55
　　　　　　　.Interior.ColorIndex = 6
　　　　　　Case Is < 65
　　　　　　　.Interior.ColorIndex = 45
　　　　　　Case Is < 99
　　　　　　　.Interior.ColorIndex = 3
　　　　　End Select
　　　　Else
　　　　　.Interior.ColorIndex = xlNone
　　　　End If
　　　End If
　　End With
End Sub '//この行まで//

※　細かいエラー処理はしていません、
※　C2セル以降は数値データが入る！という前提です。

条件付き書式が設定してあるとそちらが優先されますので、
条件付き書式はクリアしておいてください。

※　注意点　※
対象範囲が数式によって表示されている場合は何も変化しません。
数式が対応しているセルのチェンジイベントにする必要があると思います。

青など濃い色にしてしまうと数値が見えにくいと思います。
色は適宜変更してください。
↓のサイトで色のINDEX番号は選べます。m(_ _)m

https://hichame.hatenadiary.org/entry/20090715/1 …

この回答へのお礼

ご解答ありがとうございます。

マクロを持ち出さずともセル関数のIF文の入れ子構造で何とか類似の成果は出せないでしょうかね？

お礼日時：2020/06/10 14:59

No.1 回答者： めぐみん_ 回答日時： 2020/06/10 08:19

2003までは確か３個以内ですよね。

当時どうしたかと言えばマクロ（VBA）での対応しかなかったですね。

条件付き書式で4つ以上の条件を指定−Worksheet_Change
https://www.relief.jp/docs/002293.html

https://www.google.com/search?client=firefox-b-d …

この回答へのお礼

ご回答ありがとうございます
マクロですか、難しそうですね

お礼日時：2020/06/10 08:25