レポートのテキストボックスに、列名を参照した値を持ってくる
Access(2007-2016)で、人月商売の損益管理データベースを作成しています。
レポートで、従業員の勤務時間と時間単価を参考にして予算との損益を計算したいのですが、思うようにレポートが作成できません。
初歩的な質問かもしれませんが、お力を貸していただけると助かります。
以下、詳細になります。
テーブル・リレーション
〇使用テーブルは7つで、以下のようにリレーションを組んでいます。
リレーションの主な意図としては、以下のようになっています。
〇勤怠テーブルと稼働テーブルが1:多
例)
勤怠テーブル(1):Aさんが7/1に8時間働いた
稼働テーブル(多):↑の内訳は、受注明細Aに3時間、受注明細Bに4時間、受注明細Cに1時間だった
〇受注テーブルと受注明細テーブルが1:多
例)
受注テーブル(1):顧客Aから7/1に受注があった
受注明細テーブル(多):↑の受注内容は、タスクAとタスクCの契約だった
受注テーブル(1):顧客Bから7/3に受注があった
受注明細テーブル(多):↑の受注内容は、タスクBとタスクCとタスクEの契約だった
1.顧客テーブル---------------
顧客ID:オートナンバー
顧客名:短いテキスト
顧客ID 顧客名
1 ○○商事
2 ○○広告
3 ○○電気
2.受注テーブル---------------
受注No:オートナンバー
受注日:日付
顧客ID:数値
受注No 受注日 顧客ID
1 2020/07/01 1
2 2020/07/01 2
3 2020/07/01 3
3.受注明細テーブル-------------
受注No:数値
タスクID:数値
予算額:数値
受注No タスクID 予算額
1 2 200
1 3 300
2 1 10
2 2 20
2 3 30
2 4 40
2 5 50
3 4 40
3 5 50
4.タスクテーブル----------------
タスクID:オートナンバー
タスク名:短いテキスト
タスクID タスク名
1 業務A
2 業務B
3 業務C
4 業務D
5 業務E
5.勤怠テーブル----------------
勤怠管理No:オートナンバー
社員ID:数値
出社日:日付
出社時間:日付/時刻
退社時間:日付/時刻
勤怠管理No 社員ID 出社日 出社時間 退社時間
1 1 2020/07/02
2 2 2020/07/02
3 3 2020/07/02
4 1 2020/07/03
5 2 2020/07/03
6 3 2020/07/03
7 4 2020/07/03
8 5 2020/07/03
9 3 2020/07/07
6.稼働テーブル------------------
稼働管理No:オートナンバー
勤怠管理No:数値
受注No:数値
タスクID:数値
稼働時間:数値
稼働管理No 勤怠管理No 受注No タスクID 稼働時間
1 1 1 3 4
2 1 1 2 5
3 1 3 5 2
4 2 1 2 3
5 2 2 1 3
6 3 3 5 2
7 4 3 4 10
8 5 3 4 6
9 5 1 3 7
10 6 1 2 8
11 7 2 5 9
12 7 3 4 4
13 8 3 4 3
14 9 3 5 4
7.社員テーブル------------------
社員ID:オートナンバー
社員名:短いテキスト
時給:数値
社員ID 社員名 時給
1 一郎 100
2 二郎 200
3 三郎 300
4 四郎 400
5 五郎 500
以上のテーブルから作成したクロス集計クエリ「Q_メイン」
これをもとにレポートを作ります。
###レポート
クロス集計クエリ「Q_メイン」の全てのフィールドを選択
以下のように集計のオプションを設定し、レポートを作成します。
すると以下のようなレポートが完成します(少し体裁を整えました)。
これに、テキストボックス(青部分)を追加し、各業務への稼働時間×時給の計算結果を入れます。
ここが本題になるのですが、以下の画像のオレンジ部分のようにテキストボックスを追加し、損益を計算したいのですが、実装方法が分かりません。
顧客名と、列名になっている業務内容(業務A~D)に紐づけて、予算額を引っ張ってくる方法はあるのでしょうか?
顧客名は変動しますが、列名はどの顧客名でも固定(業務A~Dの4つ)なので、ヘッダーの顧客名さえ参照できれば、予算額を持ってこれる気もしているのですが、理解が足りずどうしたらよいか分かりません。
お力をお貸しいただけると助かります。よろしくお願いいたします。
※追記:DLookUpで持ってきた予算額の合計
教えていただいた方法で、月ごとに損益を計算することは出来ました(オレンジ部分)。
しかし、それを顧客ごとに集計しようとすると、予算部分の合計が上手くいきません(黄色部分の「総予算」)。
例えば業務Bの総予算(黄色部分)は、200+200で400になっているはずなのですが、どこから数字を持ってきたか1000になっています。「顧客名フッター」の他の部分の集計はうまくいっているのですが、予算だけが数字が合わないです。
黄色部分の「総予算」のテキストボックスには、オレンジ部分をSum()でくくった以下のようなコードを記入しています。
=Sum(DLookUp("予算額","Q_予算額","顧客名='" & [顧客名] & "' AND タスク名='業務A'"))
※オレンジ部分の「予算」のコード
=DLookUp("予算額","Q_予算額","顧客名='" & [顧客名] & "' AND タスク名='業務A'")
同フッターの他のテキストボックスのように、単純にSumするだけではダメなのでしょうか?
回答2件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2020/07/31 11:39
2020/07/31 13:25
2020/07/31 15:52