[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『VBAでセルの自動色付け、順位付けなどを行いたい』(VBA未経験)
Excel2003,Windows7
マクロの記録を使用した経験はありますが、 VBAを作成したことはないくらいのレベルです。 自作予定でしたが、作業完了期限まで時間がなく、 可能であればVBAコードをご回答頂ければ幸いです。
<作業前のデータ>
A B C D E F
1 選択セル
2
3
4
5
6 文字 文字 文字 文字 文字 文字
7 数字 数字 数字or"+"or"-"
8 数字 数字 数字or"+"or"-"
: : : :
n 数字 数字 数字or"+"or"-"
n+1 空欄
上記の様な構成のデータが1シート上の様々な場所にあるため、 上記データA1セル相当を選択した状態でマクロを実行することを考えています。 (行列番号は説明上付与しています)
<やりたいこと> F列の7〜nに数字があれば、その行(A〜F)のセルをオレンジ色に塗る
A B C D E F
3 ←A〜Fのセルをオレンジに塗る
+ ←なにもしない
- ←なにもしない
+ ←なにもしない
F列の7〜nに数字以外("+"or"-")があるE列の7〜nが全て同じ数字ならばなにもしない
⇒終了
A B C D E F
9 3 ←上記でA〜Fのセルがオレンジ
3 + ←なにもしない
3 - ←なにもしない
3 + ←なにもしない
F列の7〜nに数字以外("+"or"-")があるE列の7〜nが全て同じ数字でないならば
F列の7〜nに数字以外("+"or"-")があるE列の7〜nの中で数字が大きい順に第3位まで
その行(A〜F)のセルをローズ色に塗る。
更に、F列の7〜nに数字以外("+"or"-")がある行のみ、G列にその順位を左寄せで入れる
A B C D E F G
9 3 ←上記でA〜Fのセルがオレンジ
3 + 3 ←上位3位以内なのでA〜Fセルをローズ色に塗り、順位を左寄せで入れる
8 - 1 ←上位3位以内なのでA〜Fセルをローズ色に塗り、順位を左寄せで入れる
7 + 2 ←上位3位以内なのでA〜Fセルをローズ色に塗り、順位を左寄せで入れる
3 - 3 ←上位3位以内なのでA〜Fセルをローズ色に塗り、順位を左寄せで入れる
2 - 5 ←上位3位以内ではないので、順位だけ左寄せで入れる
以上ですが、分かりづらかったら追記致します。
レスがつかないですね。。。 まだ見て居られるでしょうか?
作成するVBAの内容には関係しませんが ・どうしてVBAを作らないといけないのか ・ご自身でどうするつもりだったのか など、書いてみられてはどうでしょう?
後は「私が一肌脱ぎましょう」と言う人が 現れるのを待つだけの様に思えます。
そもそも >作業完了期限 の「作業」と言うのは何を表しているのでしょう? VBAコードを作成する と言う事でしょうか? その様に色分け&順位をつける と言う事でしょうか?
(HANA)
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.