ふれまにっ

今回は順位シートです。

このシートは何をしているかと言うと、各ブロック毎の順位を並び変えています。
なぜ並び替えるかと言うと、賞状の印刷を行うためと、各種団体に順位報告を行うためなんです。
並び変えなくても出来るのですが、印刷項目を集めておいたほうがいいかななんて思って。

さて、B:Dのセルですが、これは単純にブロック毎の順位、チーム名、地区名を学年とブロック番号から演算で持ってきているだけです。
B5=OFFSET(対戦表!$A$2,B3*14+A5*2+1,C3*8+6,1,1)
C5=OFFSET(対戦表!$A$2,B3*14+A5*2+1,C3*8,1,1)&OFFSET(対戦表!$A$2,B3*14+A5*2+2,C3*8,1,1)
D5=OFFSET(対戦表!$A$2,B3*14,C3*8+A5,1,1)

集めた情報をF:Iのセルで順位毎に並び替えます。
F=順位番号を入れておきます。
G=IF(B5<>"",VLOOKUP(F5,B5:D8,2,FALSE),"")
H=IF(B5<>"",VLOOKUP(F5,B5:D8,3,FALSE),"")
I=印刷用の順位（例えば優勝とか）を入れておきます

J=印刷用のフラグです、これはVBAによって賞状印刷が完了したら書き込まれます。
大会中に、順位が決まったブロックから賞状を印刷したい場合もあるので、多重に印刷しないようにこのセルに書き込んでいます。
ここに１が書かれたものは、印刷を行いませんので、初期値は空白にしておきます。

次回は、賞状印刷です。