第１２講　配列
第１話　３次元配列

まず、次のエクセルシートをクリックして開いてください。
エクセル問題シート
このシートは、２番目以降のシートに
１学期中間テスト、１学期期末テスト、２学期中間テスト、
２学期期末テスト、学期末テスト
の結果が入力されています。
（RAND()つまり乱数を作って、データが作成してありますので
データは、全くデタラメです。例えば、出席番号２３番の生徒の
社会のそれぞれのテストの点数は、
０点、８９点、４４点、１９点、６６点となっていて現実性がありませんが、
あくまで模擬データですので、気にしないでください。）

今回は、３次元配列を使って、
５回のテストの総合成績を出してみたいと思います。
５回の国語の平均、社会の平均などを求めます。
５回分のデータを収納する配列は３次元でなければならないことは、
おわかりかと思います。
（出席番号、教科名、テスト種類）
のデータ構造を持っているからです。
尚、テスト種類は第１学期中間テストなどを指しています。
また、データ構造の順番は全く任意で、例えば
（テスト種類、出席番号、教科名）
とすることもできます。
要するに何をｘ要素、ｙ要素、ｚ要素とするかは、
まったく自由なわけです。
データ構造は読者に任せますが、
ここでは、（テスト種類、出席番号、教科名）のデータ構造で話を進めます。

最初の課題は、
３次元配列を用意して、
そこにシートのデータを代入することです。
まず、配列
Dim data(5, 40, 5) As Integer
Dim syori(40, 5) As Integer
を用意しましょう。
グローバルにする理由は、
代入操作、各教科の５回の平均、１学期データ処理などを
メインプロシージャでは行わず、
それぞれSubプロシージャに処理させるようにしたいからです。
構造化プログラミングでは、
なるべく部品は小さくした方がいいからです。

尚、用意する３次元配列は
Dim data(4, 39, 4) As Integer
でも本当はかまいません。
なぜなら、配列の添え字は０から始まるので、
実際にはｘ要素５個、ｙ要素４０個、ｚ要素５個あってこれで十分だからです。

ですが、基礎講座ではわかりやすさを優先して
Dim data(5, 40, 5) As Integer
Dim syori(40, 5) As Integer
とします。応用講座では、添え字０も使うことにしますが。

では皆さん、５回の平均を計算し、
それをシート学年総合に表示させるプログラムをご自分で組んでみてください。
もし、作成できたら解答例を参考にしてください。

問題解答例１

さらに、１学期中間・１学期期末・２学期中間・２学期期末・学期末テスト・学年総合
の合計や平均なども出せるように改良しましょう。

第２話へ