• 締切済み

エクセル特定範囲の色塗り 条件付き書式等

お世話になります。 エクセルで条件付き書式等で特定の範囲の色塗りかたを教えてください。 添付画像でご確認ください。 ※条件 ・添付画像の左上表内の数字は重複しないことを前提に 例(1) 1-3 (2) 2-5 といったような状況には入力しません。 よろしくお願いいたします。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.4

VBAでやってみた。出来るだけコード行数を少なくを目指してやった。 色は小生の勝手設定。 欠点(データを変更したときに連動しない。本質問ではデータは変動せず、基準範囲が変動ありかも。)もあり、また質問を改変している部分(色つけ無しの定義)もあるので、気に食わなければ無視してください。 ーー シートで A4:D10(D列はColorIndexのコード) http://www.relief.jp/docs/000482.html をみて、好きな色に変更できる。 1 1 3 3 2 4 5 5 ー 6 6 0 3 7 10 7 4 11 14 9 ー 15 15 0 5 16 20 10 E4:N6 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 標準モジュールに Sub test01() Set r = Union(Range("E4:N4"), Range("E6:N6")) For Each c In r 'MsgBox "D=" & c.Value x = WorksheetFunction.VLookup(c, Range("b4:D10"), 3, True) 'MsgBox "c=" & x If c = 0 Then c.Interior.ColorIndex = xlNone Else c.Interior.ColorIndex = x End If Next End Sub と入れて実行。 着色状況は、VBAを実行して,その結果を見てください。 塗りつぶし色は、ColorIndexsで指定にしていますが、勉強すればRGB指定に変更もできる。 参考 http://d.hatena.ne.jp/hichame/20090715/1247632406

  • msMike
  • ベストアンサー率20% (364/1804)
回答No.3

[No.2]の誤謬訂正、 》 2.セルの値 次の値の間 =1 と =3 ̄ ̄ ̄ ̄ ̄ ̄ 薄い青 の「=1 と =3」は「=4 と =5」の間違いでした。

  • msMike
  • ベストアンサー率20% (364/1804)
回答No.2

ルールの種類: 指定の値を含むセルだけを書式設定 ルールの内容: 下記のとおり ̄ ̄ ̄ ̄ ̄ ̄ ̄塗りつぶし色↓ 1.セルの値 次の値の間 =1 と =3 ̄ ̄ ̄ ̄ ̄ ̄ ローズ 2.セルの値 次の値の間 =1 と =3 ̄ ̄ ̄ ̄ ̄ ̄ 薄い青 3.セルの値 次の値の間 =7 と =10 ̄ ̄ ̄ ̄ラベンダー 4.セルの値 次の値の間 =11 と =14 ̄ ̄ ̄ ̄ ̄ ̄薄い緑 5.セルの値 次の値の間 =16 と =20 ̄ ̄ ̄ ̄ ̄ ̄薄い赤

  • mpascal
  • ベストアンサー率21% (1136/5195)
回答No.1

関連するQ&A