Excel VBA 質問スレッド №2002 (解決済)
別シートに集計
投稿者 : ema 投稿日時 : 2024/08/27(Tue) 06:48:29 OS : 未指定 EXCEL : 未指定
Sheet1をSheet2のように集計したいです。
Loopで1行ずつ回して集計しているのですが、
もっと良いやり方をご存知でしたらご教示ください。
よろしくお願いいたします。
Sheet1
A列 B列 C列 D列
区分 グループ 商品名 金額
1 1 きゅうり 100
1 1 きゅうり 100
1 1 きゅうり 200
1 2 なす 200
1 2 なす 300
1 3 にんじん 400
1 4 だいごん 200
1 6 トマト 100
2 10 みかん 100
2 10 みかん 200
2 11 りんご 300
2 11 りんご 200
Sheet2
A列 B列 C列 D列 E列
区分 グループ 商品名 金額 件数
1 1 きゅうり 400 3
1 2 なす 500 2
1 3 にんじん 400 1
1 4 だいごん 200 1
1 6 トマト 100 1
小計 1600 8
2 10 みかん 300 2
2 11 りんご 500 2
小計 800 4
合計 2400 12
Sheet1をSheet2のように集計したいです。
Loopで1行ずつ回して集計しているのですが、
もっと良いやり方をご存知でしたらご教示ください。
よろしくお願いいたします。
Sheet1
A列 B列 C列 D列
区分 グループ 商品名 金額
1 1 きゅうり 100
1 1 きゅうり 100
1 1 きゅうり 200
1 2 なす 200
1 2 なす 300
1 3 にんじん 400
1 4 だいごん 200
1 6 トマト 100
2 10 みかん 100
2 10 みかん 200
2 11 りんご 300
2 11 りんご 200
Sheet2
A列 B列 C列 D列 E列
区分 グループ 商品名 金額 件数
1 1 きゅうり 400 3
1 2 なす 500 2
1 3 にんじん 400 1
1 4 だいごん 200 1
1 6 トマト 100 1
小計 1600 8
2 10 みかん 300 2
2 11 りんご 500 2
小計 800 4
合計 2400 12
スポンサーリンク
[返信 1] Re : 別シートに集計
投稿者 : ema 投稿日時 : 2024/08/27(Tue) 10:21:03
すみませんでした
すみませんでした
当掲示板について
- Excel VBA に関する掲示板です。Excel VBA に関する質問や疑問、それに対する解決方法など気軽に投稿してください。
- 記事内ではHTMLのタグは使用できません。
- 記事は一度投稿すると修正できません。内容を訂正したい場合は返信で対応してください。
- Sub〜End Sub、Function〜End Function は自動的にプログラムコードとみなし、枠で囲って見やすくします。
- Excel VBA とは関係ないことや、他人が不快に思うようなことなど、管理人が適当でないと判断した記事は削除する場合があります。
スポンサーリンク
返信入力フォーム
( 処理日時 : 2025-07-05 05:20:23 )