Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8232 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【34508】データの合計表 ゴーヤ 06/2/4(土) 12:49 質問[未読]
【34511】Re:データの合計表 とまと 06/2/4(土) 14:26 発言[未読]
【34515】Re:データの合計表 とまと 06/2/4(土) 16:22 発言[未読]
【34516】Re:データの合計表 ゴーヤ 06/2/4(土) 17:03 お礼[未読]
【34517】Re:データの合計表 BB 06/2/4(土) 20:31 発言[未読]
【34521】Re:データの合計表 とまと 06/2/5(日) 1:02 発言[未読]
【34525】Re:データの合計表 とまと 06/2/5(日) 9:11 発言[未読]
【34553】Re:データの合計表 ゴーヤ 06/2/6(月) 17:00 お礼[未読]
【34569】Re:データの合計表 とまと 06/2/6(月) 21:43 発言[未読]
【34508】データの合計表
質問  ゴーヤ  - 06/2/4(土) 12:49 -
引用なし
パスワード
   データを表にしたいのですが、何もわからないので教えてください。
　　　　　　　1月　　　　　　　　　　　2月
　　氏名　　　点数　　　　　　　　　氏名　　　点数
　　大橋　　　　3　　　　　　　　　　佐藤　　　2
　　アイダ　　　3　　　　　　　　　　大橋　　　2
　　佐藤　　　　2　　　　　　　　　　前田　　　3
　　木田　　　　1　　　　　　　　　　前田　　　2
　　大橋　　　　2　　　　　　　　　　吉田　　　2
　　佐藤　　　　4　　　　　
というデータを氏名ごとに点数を合計した表を別シートに作成したいと思います。
また、1ヶ月ごとにシートが出来上がるので、1ヶ月がたったらそれぞれの月ごとのデータを集計した表にできればと思います。氏名はそれぞれの月ごとに違ってくるので固定できません。
　　　　　　　1月　　　2月
　　氏名　　　点数　　点数
　　アイダ　　　3　　　　
　　大橋　　　　5　　　 2
　　木田　　　　1　　
　　佐藤　　　　6　 　　2
　　前田　　　　　　 　 5
　　吉田　　　　　　　　2
このような表にしたいと思っています。どなたか教えてください。お願い致します。
【34511】Re:データの合計表
発言  とまと  - 06/2/4(土) 14:26 -
引用なし
パスワード
   一般機能の【統合】がつかえるかもしれません。
集計シートを1枚作って各月のレイアウトを同じに
すればよいと思います。

下記URL参考にしてみてください。
http://sweety.jp/honobono/faq/excel/togo_1.htm
【34515】Re:データの合計表
発言  とまと  - 06/2/4(土) 16:22 -
引用なし
パスワード
   記録して　参照アドレスを変数にすれば
VBAにもできるとおもいます。
【34516】Re:データの合計表
お礼  ゴーヤ  - 06/2/4(土) 17:03 -
引用なし
パスワード
   ▼とまと さん：
>記録して　参照アドレスを変数にすれば
>VBAにもできるとおもいます。

ありがとうございます。
統合でできました。
でも、ＶＢＡはよくわかりませんでした。
ＶＢＡも教えていただければとおもいます。
氏名は、あいうえお順に並び替えればと思います。
宜しくお願い致します。
【34517】Re:データの合計表
発言  BB  - 06/2/4(土) 20:31 -
引用なし
パスワード
   ▼ゴーヤ さん：
>▼とまと さん：
>>記録して　参照アドレスを変数にすれば
>>VBAにもできるとおもいます。
>
>ありがとうございます。
>統合でできました。
>でも、ＶＢＡはよくわかりませんでした。
>ＶＢＡも教えていただければとおもいます。
>氏名は、あいうえお順に並び替えればと思います。
>宜しくお願い致します。

ＶＢＡを自分でコーディングしてみて、分からないところを具体的に質問されたほうがいいんじゃないでしょうか？
何も分からないというのであれば、他人が作ったものを自分のファイルに入れたとしても、不都合が生じたときにさっぱり分からないんじゃないですか？
【34521】Re:データの合計表
発言  とまと  - 06/2/5(日) 1:02 -
引用なし
パスワード
   記録はどんな記録になりましたか？
【34525】Re:データの合計表
発言  とまと  - 06/2/5(日) 9:11 -
引用なし
パスワード
   Sub Macro2()

　　Worksheets("集計").Range("A1").Consolidate Sources:=Array( _
　　　　"'D:\ﾃﾞｽｸﾄｯﾌﾟ\[test.xls]1月'!R1C1:R5000C2", _
　　　　"'D:\ﾃﾞｽｸﾄｯﾌﾟ\[test.xls]2月'!R1C1:R5000C2", _
　　　　"'D:\ﾃﾞｽｸﾄｯﾌﾟ\[test.xls]3月'!R1C1:R5000C2"), _
　　Function:=xlSum, TopRow:=True, LeftColumn:=True, CreateLinks:=False
　　
End Sub

　　　　　↑たとえばこんな感じで記録がとれると思うので

R1C1:R5000C2←ここの5000の行数のところを多めにとっておけば集計
　　　　　　　　できると思います。　
　　　　　　　
【34553】Re:データの合計表
お礼  ゴーヤ  - 06/2/6(月) 17:00 -
引用なし
パスワード
   ▼とまと さん：

ありがとうございました。統合する事ができ、
並び替えも出来ました。
ただ、統合したときに月が、1月、2月、3月・・・ではなく
10月、11月、12月、1月・・・となってしまいました。
何か解決する方法があれば教えてください。
何度も何度もすいません。
【34569】Re:データの合計表
発言  とまと  - 06/2/6(月) 21:43 -
引用なし
パスワード
   ▼ゴーヤ さん：

確かに並びが変わってしまいますね。。
私も文字列にしたり書式をいじったりして
みたのですがどうしても

10, 11, 12,　1,　2,　3

の順になりますね。
最善の方法ではないかもしれないですけど
月を文字列にして01月、02月 03月などとしておいて

データ→並び替え→オプション→列単位にチェックで
列方向の並び替えをしてみてください。
これも多めに列をとっておいて記録してみてください。

もし別解ご存知の方がいらっしゃったら
書き込みお願いします。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8232 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free