数式・条件付書式の設定方法を教えてください。
初心者です、宜しくお願いいたします。
1.F6:H9に設定した内、F6・G6・H6に設定した数式及び条件付書式です。(現在、まだ40行分しか設定出来ていません)
●F6 獲得点数
・点数をマニュアル入力する。
・条件付書式 =SUM($F$6:$F$9)=100000 → 書式(パターン) ブルー
●G6 順位
・数式 =IF(F6="","",RANK(F6,$F$6:$F$9)+COUNTIF($F$6:$F6,F6)-1)
・条件付書式 =SUM($G$6:$G$9)=10 → 書式(パターン) ブルー
●H6 加算後点数
・数式 =IF(OR(C6="",E6="",F6="",G6=""),"",(IF(G6=1,F6+12000,IF(G6=2,F6+4000,IF(G6=3,F6-4000,IF(G6=4,F6-12000))))))
・条件付書式 =SUM($H$6:$H$9)=100000 → 書式(パターン) ブルー
2.実際の処理
●F列(F6:F9)
・F6:F9に点数を入力する。
・その合計が100、000点になれば、F6:F9をブルーで塗りつぶす。
--------------
●G列(G6:G9)
・入力したF6:F9の点数で順位を決定し順位をG列に表示する
・同点の場合は若いセル数を上位にする。
・その合計が10になれば、G6:G9をブルーで塗りつぶす。
--------------
●H列(H6:H9)
・F列・G列の結果を受けて数式のような点数を表示する
・その合計が100、000点になれば、H6:H9をブルーで塗りつぶす。
--------------
・4行毎に塗り潰しの色を変えたい。
・6行目:9行目はブルーで塗りつぶす。
・10行目:13行目は黄色で塗りつぶす。
・14行目:17行目はブルーで塗りつぶす。
ーーーーーーーーーーーーーーーーーー
3.ご指導いただきたき事
上記のようにしたいのですが、約1000行ほどになりますので、250回ほど設定しなければなりません。
ぜんぜん判りませんが、何か良い設定方法をご指導いただきたくお願い致します。
●現在設定を始めました、数式及び条件付書式には、拘りません。
●黄色い部分もブルーにし、ブルー一色でも結構です。
●VBA記述でも可能なのでしょうか。
VBA記述はぜんぜん出来ません、申し訳ございませんが、可能であれば宜しくお願いいたします。
お礼
できました! 大変助かりました! ご回答ありがとうございます。