エクセルで成績処理をするのに・・・

質問

いつもお世話になっております。
文章だけで書くのは難しく、伝わりにくいかもしれませんが、今、このようなことで悩んでいます。いい方法があれば、教えてください。

成績一覧表をエクセルで作りました。
Ｂ１のセルから横に（Ｃ１、Ｄ１…と）、氏名を入力しました。
Ａ２のセルから下へ（Ａ３、Ａ４…と）、評価項目を入力しました。
そして、氏名と、項目とのクロスする部分に◎、○、△のいずれかの記号を入力しました。
１学期にこれを作り、２学期には、１学期のものをコピーして、評価した部分（◎、○、△）だけを全部クリアし、新たに２学期の分を入力し直しました。

３学期も、同じようにして、３学期の分を作ろうと思うのですが、それとは別に、一人の子について、１学期、２学期、３学期が一度にわかるようなものも作りたいと思います。
つまり、例えばＢ１、Ｃ１、Ｄ１のセルを結合し、ここに氏名を入れ、Ｂ２には１学期の評価、Ｃ２には２学期の、Ｄ２には３学期の評価が入るようにしたいのです。新たに作るよりもと思い、１学期のものを加工したのですが、まず、列を２列ずつ挿入し、次に氏名のところを結合し、次に一人ずつ２学期の評価をコピーして、加工したシートに貼り付けるという作業を行いました。これですと、クラスの人数分、同じ作業を繰り返すことになりますよね。マクロを使えば何とかなるのかもしれませんが、マクロについては全く知識がないので、もっといい方法があればと思います。
わかりにくいかもしれませんが、いいアドバイスがあれば、よろしくお願いします。

回答No.3

Rukky · ベストアンサー

rinrin379さん　こんにちはぁ。
みなさんこんにちはぁ。
シート１の名称が１学期
　〃　２の名称が２学期
　〃　３の名称が３学期
　〃　４の名称が総合評価　とすると以下のような作業でしょうか。

シート”１学期”
　　　　A　　　　　 B　　　　C　　　D　　
1　　　　　　　　 益田　　 岡田　　 中川　　
2　評価項目１　　　◎　　　○　　　×
3　評価項目２　　　×　　　△　　　△
4　評価項目３　　　△　　　◎　　　○
5　評価項目４　　　○　　　×　　　△
6　評価項目５　　　△　　　◎　　　○

シート”２学期”
　シート”１学期”同様作成

シート”３学期”
　シート”１学期”同様作成

シート”総合評価”

　　　　A　　　　　 B　　　　　　 C　　　　 　D　　
1　　　　　　　　 益 田　　　 岡　田　　　 中　川　　　←(注１：セルの数式参照)
2　総合評価　◎×△○△　 ○△◎×◎　 ×△○△○　　　　　　　　←(注２：セルの数式及び書式設定参照)
3　学　期　　　　　 １　　　　　１　　　　　１　
4　評価項目１　　　◎　　　　　○　　　　　×　　　←(注３：セルの数式参照)
5　評価項目２　　　×　　　　　△　　　　　△
6　評価項目３　　　△　　　　　◎　　　　　○
7　評価項目４　　　○　　　　　×　　　　　△
8　評価項目５　　　△　　　　　◎　　　　　○

注１：セルの数式
B1セルの数式
＝'１学期'!B1
C1→D1へB1をフィルハンドルでコピー

注２：セルの数式及び書式設定
B2セルの数式
＝B4&B5&B6&B7&B8
C2→D2へB2の数式をフィルハンドルでコピー
セルの参照でエラーがでた場合
セルの書式設定＝分類(Ｃ)　正負記号(+＝△：-＝▲)とする

注３：セルの数式
B3のセルの数式
=HLOOKUP($B$1,'１学期'!$B$1:$D$8,COUNTA('１学期'!$B$1:B2),FALSE)
B4→B8へB3の数式をフィルハンドルでコピー
B3のセルの参照形式を変更
=HLOOKUP(B1,'１学期'!$B$1:$D$8,COUNTA('１学期'!B1:B2),FALSE)
C3→D3へ参照形式を変更したB3の数式をフィルハンドルでコピー
コピーしたC3の参照形式を変更
=HLOOKUP($C$1,'１学期'!$B$1:$D$8,COUNTA('１学期'!$C$1:C2),FALSE)
C4→C8へ参照形式を変更したC3の数式をフィルハンドルでコピー

コピーしたD3の参照形式を変更
=HLOOKUP($D$1,'１学期'!$B$1:$D$8,COUNTA('１学期'!$D$1:C2),FALSE)
D4→D8へ参照形式を変更したC3の数式をフィルハンドルでコピー

C1～C8を選択→右クリック→挿入→右方向にシフト
挿入したC2へB2をフィルハンドルでコピー
B3の参照形式を元にもどす
=HLOOKUP($B$1,'１学期'!$B$1:$D$8,COUNTA('１学期'!$B$1:B2),FALSE)

C3へB3の数式をコピー
コピーしたC3の参照シート名を変更する
=HLOOKUP($B$1,'２学期'!$B$1:$D$8,COUNTA('２学期'!$B$1:B2),FALSE)
C4→C8へ参照シート名を変更したC3の数式をフィルハンドルでコピー

D1～D8を選択→右クリック→挿入→右方向にシフト
挿入したD2へC2をフィルハンドルでコピー
D3へC3の数式をコピー
D3の参照シート名を変更する
=HLOOKUP($B$1,'３学期'!$B$1:$D$8,COUNTA('３学期'!$B$1:B2),FALSE)
D4→D8へ参照シート名を変更したD3の数式をフィルハンドルでコピー

B1～D1を結合する

あと岡田君、中川さんにも益田ちゃんと同じことをする。

クラス人数がおおければたいへんかとおもいますが、式を理解してすれば
たやすいですし、来年度では一度つくったシートを応用できますので、
後々らくかと思います。

尚、すべてテストしていませんので、間違ったらすいません。
そして、できれば上記式をコピペして使うのではなく、ご自分で手入力して下さい。
そのほうが、覚えます。
では。

回答No.5

imogasi

ＢＣＤ・・列が氏名があるなら(２５５人以内）
第１学期を、縦に
見出し文字を下記に入れる。各人の実績はＢ列から右へ入れる。
Ａ２
Ａ３
Ａ４
Ａ５
の４つとして
第２学期は
Ａ６
Ａ７
Ａ８
Ａ９
とし、
第３学期はＡ１０：Ａ１３です。
ーー
Ｓｈｅｅｔ２より第２学期分を採ってくるのは、ＶＢＡで処理がお勧めです。２重ループの数行のコードでできます。
勉強してください。
仕事にエクセルを使うにはＶＢＡができないと、すぐ行き詰まります。これが私の持論です。関数はややこしくなるだけ。
今回本件は＝Ｓｈｅｅｔ２！ＸＸのようなことで凌げるように予想しますが。
普通は文字列結合などを使うものではないと思います。◎の数を勘定しようにも、すぐ困ります。セルの文字数を勘定するのは方法はありますが。本他の質問に出ていましたが。

回答No.4

wolis

３学期が一度にわかるだけで宜しければ、Ｂ１，Ｃ１，Ｄ１を結合せずに１マスに表示する方法もあります。

例えば Ｂ２に入力する内容では
="１学期のシート名"!B2&"２学期のシート名"!B2&"３学期のシート名"!B2

１学期のシート名がSheet1、２学期のシート名がSheet2、３学期のシート名がSheet3 と仮定した場合
=Sheet1!B2&Sheet2!B2&Sheet3!B2　←Ｂ２のセルの例です。

のように入力してセルをコピーし◎、○、△を表示させたいセルすべてに貼り付けます。
列の幅を少々広げてあげれば１学期等のフォームを大きく変更しなくても大丈夫だと思いますが、如何でしょうか。

回答No.2

CaveatEmptor

公立高校で英語を教えています。

vlookup関数でできます。成績処理についてはいろいろなサイトで説明があると思いますので、一度、検索してみてはどうでしょうか？

回答No.1

Tasuke22

それほど難しくはないでしょう。
一学期、二学期、三学期の評価のシートとは別に総合評価のシートを
作成します。

そこに、例えばB1を選択し、値を入れるところに=と入力します。
それから、名前があるシート（1学期から3学期までどれでもいい）を
マウスでクリックします。それから名前のあるセルをクリックします。
それでエンターを押せば、創業評価に名前が入ります。

次に、B2に同じ要領で、今度は１楽器の評価を取ってきます。
次は、C2に同じ要領で、2学期の評価を取ってきます。
次は、D2に同じ要領で、3学期の評価を取ります。

これで一人分の出来上がりです。
この一人分のセルを選択し、人数分だけコピーしたら出来上がり
だと思います。