過去ログ

                                Page     413
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼DAO処理  ひろ 03/10/18(土) 18:03
   ┗Re:DAO処理  サムライ♪ 03/10/23(木) 15:47

 ───────────────────────────────────────
 ■題名 : DAO処理
 ■名前 : ひろ <muraoka_hm@yahoo.co.jp>
 ■日付 : 03/10/18(土) 18:03
 -------------------------------------------------------------------------
   業務にて予算実績管理をしております。ACCESSで業務をしているのですが以下の4個のテーブルがありそれらのデータをある集計テーブルにひとまとめにしたいのですがDAOで集計テーブル含め5個のRECORDSETを開きどういうVBAを記述したらいいのかわかりません。クエリはなるべく使いたくなかったのです。よろしくお願いします。
以下
(部署マスタ)    
部署CD  部署名
100   経理部
200   総務部
(経費マスタ)    
経費CD 経費名
1    賃金
2    給与
3    通信費
4    交通費
(経費予算データ)        
経費CD  経費名   金額
100    賃金    500
100    給与    400
100    通信費   300
100    交通費   200
200    賃金    600
200    給与    500
200    通信費   400
200    交通費   300
(経費実績データ)            
部署CD 経費名    金額    実績月
100    賃金    450    4
100    給与    350    4
100    交通費   150    4
200    賃金    550    4
200    給与    450    4
200    通信費   350    4
200    交通費   250    4
100    賃金    450    5
100    給与    350    5
100    通信費   250    5
100    交通費   150    5
200    賃金    550    5
200    給与    450    5
200    通信費   350    5
上記4テーブルのデータを下記テーブルへ
(予算実績管理テーブル)                        
部署CD 部署名 経費CD  経費名  予算額   4月実績 5月実績
100  経理部    1   賃金    500    450    450
100  経理部    2   給与    400    350    350
100  経理部    3   通信費   300    0     250
100  経理部    4   交通費   200    150    150
200  総務部    1   賃金    600    550    550
200  総務部    2   給与    500    450    450
200  総務部    3   通信費   400    350    350
200  総務部    4   交通費   300    250    0
このような感じです
説明不足で申し訳ありません
実際のデータは経費CDは約20程度、部署データは約50部署、実績は4月から3月までになります

部署

 ───────────────────────────────────────  ■題名 : Re:DAO処理  ■名前 : サムライ♪  ■日付 : 03/10/23(木) 15:47  -------------------------------------------------------------------------
   ▼ひろ さん:
>業務にて予算実績管理をしております。ACCESSで業務をしているのですが以下の4個のテーブルがありそれらのデータをある集計テーブルにひとまとめにしたいのですがDAOで集計テーブル含め5個のRECORDSETを開きどういうVBAを記述したらいいのかわかりません。クエリはなるべく使いたくなかったのです。よろしくお願いします。

クエリを使った方が処理能力が速いと思います。クエリで追加、削除を行うと
MDEファイルが肥大化になることを心配しているのでは?それなら、閉じると
きに自動的に最適化/修復を行えば良いと思います。どうでしょうか?

もしくは、VBAコードでクエリを実行させるプログラムを記載すれば大丈夫だ
と思います。これくらいなら出来ると思いますので、がんばって下さい。

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 413