Access2016､VBA､家計簿で各出費の摘要ごとに一ヶ月の合計金額を表示・出力

今家計簿をＡｃｃｅｓｓ２０１６､ＶＢＡで作成しています。
財布から支払った金額を一ヶ月で、その摘要の種類毎に合計してクエリで出力したり、ＰＤＦファイル又はエクセルに出力したりしたいです。
ためしにクエリーでしてみると、一度に違う摘要の合計を出力することはできず、支払った金額のフィールドがゼロ円になってしまいました。
何か良い方法はありませんでしょうか。

初歩的な質問かと思いますが、誰かわかる方がいましたら、ご教授のほうよろしくお願いします。

質問者からの補足コメント

• 

  エクセルで作成したときは、列として、各出費摘要毎に列を作成して、たとえば、
  ・食費の列
  ・医療費の列
  などと列を増やしていき、一番左の列は日付にしました。
  すると、摘要の数が増えて行くと、右に列が増えて行くし、その計算式をセルにいれて計算処理もさせると、行数が何ヶ月もするとかなり増えてきて、エクセル君がいう事を聞きません。
  
  ですので、アクセスで作ろうかと思いました。
  
  ちなみに、エクセルでは、横の列に財布の出費、銀行口座の入出、と作ってます。
  でも、重いのでもう使用していません。

  No.1の回答に寄せられた補足コメントです。 補足日時：2016/05/02 06:38

No.3 回答者： 30246kiku 回答日時： 2016/05/02 09:47

クロス集計を使ってみてはどうでしょう

テーブルの内容がわからないので･･･
添付図上段のテーブル ★★ があったとします
以下をクエリの SQL ビューに記述して表示してみると、
添付図下段の表示になります


TRANSFORM Sum(金額) AS 値
SELECT 摘要, Sum(金額) AS 計 FROM
(SELECT 1 AS T, 日付, 摘要, 金額 FROM ★★
UNION ALL
SELECT 2, 日付, '合計', 金額 FROM ★★) AS Q1
GROUP BY T, 摘要
PIVOT Format(日付,'yyyy/mm');

No.2 回答者： mapascal 回答日時： 2016/05/02 06:49

私だったら入力は、金額と項目の二列だけにして、項目をリスト表示の中から選んで入力するようにしておいて、一ヶ月ごとにＶＢＡで処理するようにすると思いますけど。

計算もセルに入れるよりＶＢＡで計算させたほうが早かったと思います。

No.1 回答者： mapascal 回答日時： 2016/05/02 06:29

私だったらエクセルのＶＢＡでやっちゃいますけどね。

この回答へのお礼

回答ありがとうございます。イヤー、しかしですね、エクセルで作るとかなり重たくなるんです。何か月分もたまってくると。すると、ストレスがたまっちゃって・・・。どうしたらよいでしょうか。

お礼日時：2016/05/02 06:34