Accessで現金出納簿を作りたいのですが。

これまで桐で経理簿を作って、一括処理で処理していましたが、このたびAccessを使うことになりました。
桐には、#直前値いう関数があり重宝しておりましたが、アクセスには該当する関数が見あたりません。
出納簿のフィルドを次のようにした場合、残高欄はどう設定したらよいでしょうか。
［日付］，［摘要］，［収入］，［支出］，［残高］
　残高は、前日の残高＋収入－支出　　で算出されますが、アクセスのテーブルには計算式を入れるコントロールソースがありますが、どのような計算式になるでしょうか教えて下さい。
　

No.1 ベストアンサー 回答者： yjposhiete 回答日時： 2006/02/01 11:22

レポートの詳細の欄にテキストボックスを２つ配置してください。

仮にテキストボックスの名前を[収入累計]、[支出累計]とします。[収入累計]のコントロールソースを[収入],[支出累計]のコントロールソースを[支出]とします。２つのテキストボックスのプロパティのデータで集計実行の欄を「全体」にします。[残高]のコントロールソースを[収入累計]-[支出累計]として下さい。そして[収入累計]、[支出累計]のプロパティで可視を「いいえ」にして下さい。これで残高の計算ができると思います。

この回答へのお礼

早速教えていただいて有り難うございました。
レポートで［収入累計］－［支出累計］＝［残高］了解いたしました。
出納簿テーブルに表示は無理というものでしょうか。
かけだしのACCESSなものですから苦労しています。
大変参考になりました。

お礼日時：2006/02/01 17:11

No.4 回答者： ngsvx 回答日時： 2006/02/03 12:49

#3です。

すみません、Ｂの方は、入力ができないみたいです。
（前にやったときは、できたと思ったのですが、記憶ちがいかな？）

一応、手順を書いておきます。

１．クエリを作ります
　select t1.id, t1.日付, t1.入金, t1.出金,
　　　(select sum(t2.入金) - sum(t2.出金) from tbl as t2 where t2.id<=t1.id)
　　from tbl as t1;

　をSQLビューで入力して下さい（全角スペースは直して下さい）

２．このクエリを元にしてフォームを作ります。



ＡのVBAを使う方法の概要は

１．テーブルに累計フィールドを追加
２．フォームのイベント（フォームのオープン時、金額項目の移動時）でテーブルの累計をVBAで再計算する。
（VBAで１レコードづつ書き換えるより、SQLでまとめて書き換えた方が速いと思います）
３．フォームの累計用コンポーネントをrequeryする

となります。

今ちょっと時間と資料がないので、申し訳ないですが詳細は省かせてもらいました。

この回答へのお礼

早速教えていただいて感謝申し上げます。
処理のイメージがわかりましたので、じっくり研究させていただきます。アクセスのクエリは昔のＲ：ＢＡＳＥ５０００にそっくりで懐かしい思いです。
大変参考になりました。

お礼日時：2006/02/04 16:46

No.3 回答者： ngsvx 回答日時： 2006/02/02 10:43

どうしても、ということなら、

Ａ．VBAなどのプログラムを使ってもいい
Ｂ．テーブルにレコードをソートするためのキーがある
　（同一日付でレコードが１件しかないのであれば、「日付」をキーにできます）

のどちらかの条件をみたしていれば、できなくもありませんよ。

＊それぞれで、方法が違います

この回答への補足

いまＶＢＡの勉強中です。是非使ってみたいです。
テーブルには取引毎にＩＤがついておりますので、ソートはできます。
どちらも教えていただければ、参考にしたいと存じます。

補足日時：2006/02/02 19:10

No.2 回答者： yjposhiete 回答日時： 2006/02/01 18:14

拙い説明でしたが分かって頂けたようでホッとしました。

ところでテーブルに残高を持つことは出来ません。
あらかじめ残高を計算しておいて入力は出来ますが、プリントする時点でデータ並べ替えて印刷したらとんでもない結果になってしまいます。
残高はやはり必要なとき計算をして見ることができれば良いと思います。