日報のデータを作成しており、データ概要は以下のとおりです。
テーブル名_ta日報
フィールド 日付(日付型),休業日(Yes/No型),来客数(テキスト型)
[日付] [休業日] [来客数]
2016/12/01 true 32
2016/12/02 false 14
2016/12/03 true 8
フォーム名_fo日報
ヘッダー部に [txt期間はじめ]と[txt期間おわり]の入力欄があり、
全フィールドを選択した選択クエリ(q抽出)を作成し、
[日付]の抽出条件を『Between [Forms]![fo日報]![txt期間はじめ] And [Forms]![fo日報]![txt期間おわり]』として、fo日報ではこのq抽出のデータを一件ずつ表示しています。
質問意図は下記の【 】の項目を記載のように表示することです。
(便宜上、表形式で記述していますが、1日1画面で読み込みます)
※2016/12/01~2016/12/03を抽出した場合
[日付」 「休業日」「来客数」【レコード数】【休業日数】【来客累計】
2016/12/01 true 32 1 1 32
2016/12/02 false 14 2 1 46
2016/12/03 true 8 3 2 54
※2016/12/02~2016/12/03を抽出した場合
[日付」 「休業日」「来客数」【レコード数】【休業日数】【来客累計】
2016/12/02 false 14 1 0 14
2016/12/03 true 8 2 1 22
【レコード数】は、抽出されたデータ上の通し番号。
【休業日】は、チェックボックス「休業日」の、抽出期間中のtrueの数。
【来客累計】は、テキストボックス「来客数」の抽出期間中の合計。
クエリ上で「来客累計」のフィールドを作りsumしたところ
[日付」 「休業日」「来客数」【レコード数】【休業日数】【来客累計】
2016/12/01 true 32 1 1 54
2016/12/02 false 14 2 1 54
2016/12/03 true 8 3 2 54
となってしまうミスをしました。
【抽出期間のはじめから現在表示しているレコードまで】を指定する手段やコードがわかれば
それだけで解決するのではないかと思っています。
どうか解決案をご教示ください。よろしくお願いします。
わかりづらい点があればご質問ください。
No.1ベストアンサー
- 回答日時:
日報の休業日は便宜上数値の型とします。
それぞれに更新クエリを作ります。ここでは、抽出条件は考慮していま
せん。そこは任せます。
更新クエリを3つ作ります。
① レコード数の更新は、
UPDATE 日報 SET 日報.レコード数 = DCount("*","日報","日付<=#" & [日付] & "#");
② 休業日数の更新は、
UPDATE 日報 SET 日報.休業日数 = DCount("*","日報","休業日=1 and 日付<=#" & [日付] & "#");
③ 来客数の更新は、
UPDATE 日報 SET 日報.来客累計 = DSum("来客数","日報","日付<=#" & [日付] & "#");
となります。
実装については、クエリの作成でsqlのビューを指定してそこにsqlの
upadateから始まる文字列をコピペして下さい。後は、実行するだけで
す。
実際のフォームでの確認に付いては、これに更に輪をかける必要が有る
かも知れません。そこ迄は考慮していません。
確認願います。
テストファイルを作成して動作確認をしました。
抽出条件を考慮されていないということで不安でしたが、
updateの構文を調べていたらクエリを指定できるということで
UPDATE ta日報 SET ta日報.レコード数 = DCount("*","q抽出","日付<=#" & [日付] & "#"),
ta日報.休業日数 = DCount("*","q抽出","休業日=-1 and 日付<=#" & [日付] & "#"),
ta日報.来客累計 = DSum("来客数","q抽出","日付<=#" & [日付] & "#");
として、解決の糸口が見えました。
行き詰っておりましたので、大変助かりました。
先の投稿の件も合わせて、本当にありがとうございます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
「24日の0時」って・・・
-
日付の大小の表現
-
「時間」、「期日」、「日付」...
-
差し込み印刷に当日の日付が入...
-
履歴書の日付間違いで落ちますか。
-
エクセルで日付別にシートを分...
-
ACCESSで日付ごとに自動連番(...
-
Accessで規定値に土日含まず5日...
-
Excelについて
-
回覧板の日付について質問です...
-
EXCELで日付を****年上期、****...
-
エクセル マクロで指定日にメ...
-
エクセル マクロ 名前を付けて...
-
Word2013「20」と打つと勝手...
-
ワードの日付け自動入力のキャ...
-
フォームの値をクエリーに反映...
-
差込印刷 縦書きで和暦(漢数...
-
Microsoft Access での経過日数...
-
ピボットテーブルの日付フィル...
-
VBAフォームのテキストボックス...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
「24日の0時」って・・・
-
日付の大小の表現
-
「時間」、「期日」、「日付」...
-
回覧板の日付について質問です...
-
差し込み印刷に当日の日付が入...
-
履歴書の日付間違いで落ちますか。
-
エクセル マクロ 名前を付けて...
-
Excelについて
-
パソコンで購入したデーターが...
-
2つの日付の中間の日付 エク...
-
Excelでヘッダに前日の日付を表...
-
エクセルで日付け表示で、明治...
-
エクセルで日付別にシートを分...
-
Excelで1週間毎の集計(今週と...
-
エクセルで6ヵ月後を自動入力で...
-
マクロボタンを押すと、ファイ...
-
差込印刷 縦書きで和暦(漢数...
-
日付以外のデータを抽出したい...
-
EXCELで日付を****年上期、****...
-
Facebookで投稿日時を変更できない
おすすめ情報
「来客数」は ×テキスト型 → ○数値型 です。