| |
▼さぶちゃん さん：
>Ｆ列がその合計点(高得点順)となりますが、もし同点がいた場合はＧ列に一度表示します。その同点に対して順位を付けるために、まず最初にＦ列の合計点にＤ列にある点数を加算します。ここではＡ３、Ａ４の試験者が同点ですがＤ列の点数を加算するとＡ４の試験者の方が高得点となるのでＡ３、Ａ４の行を入れ替えてＡ４の行が上になる様に入れ替えた形でＨ列に表示します。(ここでは入れ替えが出来ないためそのままＨ列に表示してあるだけですが。)
>この様にＤ列の加算で順位が付いた場合はここまでの処理となりますが、同じ様に同点となっている７行目から９行目までの場合、上記と同じやり方でＤ列を加算すると、まず９行目が得点が高いのでＨ列に９行目が上となって表示します。
>７行と８行はＤ列の値が同じため、次の手順としてＢ列を加算します。
>これで得点差が出れば高得点者が上位となりますが、ここではＢ列の値も同じため、次の手順としてはＡ列とＥ列の合計点をＦ列の点数に足します。
>ここでは７行目のＡ列の値が８行目より高いため最終的にＪ列にこの３つの同点の順位としては９行、７行、８行という順位として表示します。
>すみません、長々と書いてしまいましたが、ざっとこんな感じの処理を一気にではなく上述した様なステップを踏みながら処理していきたいと思っています。
>ＶＢＡコード初心者の私には色々な参考文献を見て試行錯誤しているのですがこの様に複雑になると全くわかりません。
A B C D E F G
1 名前 項目１ 項目２ 項目３ 項目４ 項目５ 合計
2 A 8.0 8.0 7.9 7.8 7.1 23.7
3 B 7.9 7.8 7.6 7.3 7.1 22.7
4 C 7.9 7.6 7.6 7.3 7.2 22.5
5 D 7.8 7.6 7.5 7.4 7.1 22.5
6 E 7.9 7.7 7.4 7.3 7.0 22.4
7 F 7.8 7.6 7.4 7.3 7.2 22.3
8 G 7.9 7.5 7.4 7.2 7.0 22.1
9 H 7.8 7.5 7.4 7.2 7.0 22.1
10 I 7.9 7.5 7.3 7.3 7.1 22.1
上記のようなデータがあるとして、並べ替えで
優先順位が、G列の合計、次がE列の項目4、そしてその次がC列の項目2、ここまで
一回の操作でできます。
その後、もう一度並べ替えで、最優先がG列の合計、次がB列の項目1、そしてその次が項目５と二回ソートすれば良いのでは？
コードは、マクロの記録で・・・
Keyが3つ以上のソートは、ichionseさんがどこかに書いていたと思うのですが、
見つかりませんでした。
見つけた人教えてください。
|
|
ponpon
- 08/7/23(水) 9:43 -
