ACCESS2003 追加クエリの条件設定について

質問

ACCESS2003 追加クエリの条件設定について

条件設定用のフォーム"A"があり、
その"A"で指定された条件を元にテーブル"B"から値を抽出し、
テーブル"C"に書き込む追加クエリを作成しています。

フォーム"A"には
・「対象日」フィールド
・「月で出力」チェックボックス

テーブル"B"には
・「試験開始日」
・「試験終了日」
・他多数項目フィールド

追加クエリではフォーム"A"の情報を元に、テーブル"B"から
「試験開始日」:<=[Forms]![F_A]![試験開始日]
「試験終了日」:>=[Forms]![F_A]![試験開始日]

と、月をまたがって実施される試験が殆どのため、「対象日」に入力された日付を
網羅するデータを取り出しています。

新たに作りたいのは、フォーム"A"の「月で出力」チェックボックスにチェックがついた
時に、フォーム"A"の「対象日」フィールドから月を取り出し、テーブル"B"の「試験開始日」
「試験終了日」それぞれで月を比較し、同じ月のデータを抽出したいのですが
追加クエリの抽出条件に下記の通り記述した所、データをヒットさせる事が出来ません。

試験開始日フィールドの抽出条件
IIf([Forms]![F_A]![月で出力]=True,Year([試験開始日])=Year([Forms][F_A]![対象日]) And Month([試験開始日])=Month([Forms]![F_A]![対象日]),[試験開始日]<=[Forms]![F_A]![対象日])

試験終了日フィールドの抽出条件
IIf([Forms]![F_A]![月で出力]=True,Year([試験終了日])=Year([Forms][F_A]![対象日]) And Month([試験終了日])=Month([Forms]![F_A]![対象日]),[試験終了日]>=[Forms]![F_A]![対象日])

どこが問題なのでしょうか…

どなたかご教授お願い致します。

回答No.1

nda23 · ベストアンサー

WHERE句にIIfはあまり使いません。

([Forms]![F_A]![月で出力] AND
Year([試験開始日])=Year([Forms][F_A]![対象日]) AND
Month([試験開始日])=Month([Forms]![F_A]![対象日]) AND
Year([試験終了日])=Year([Forms][F_A]![対象日]) And
Month([試験終了日])=Month([Forms]![F_A]![対象日])) OR
((NOT [Forms]![F_A]![月で出力]) AND
[試験開始日]<=[Forms]![F_A]![対象日] AND
[試験終了日]>=[Forms]![F_A]![対象日])

これでどうなるでしょう？

お礼

nda23様

ご回答ありがとうございます、またレスが遅くなり申し訳ありません。
頂いた回答を元にやってみました。
が、どうしても0件抽出になってしまいます。

一つずつ追っていくと、[Forms][F_A]![対象日]にMonth、Year関数を使うと
日付/時刻型の基準値「1899/12/30」の値を持ってきてしまっているようです。
[Forms][F_A]![対象日]の書式や定型入力を日付にしても変わらなかった為、
Formatを用いて無理やり"YYYY/MM/DD"型に変換した後、Month・Yearを
当てると正常に月・年が取り出せました。
後、チェックボックスの評価はTrue/False、-1,0でないと反映しないようです。
（NOTでうまく動きませんでした）

結論としまして、追加クエリに

フィールド：IIf([[Forms]![F_A]![月で出力]=True,True,[試験開始日]<=[Forms]![F_A]![対象日]
抽出条件：True AND Year([試験開始日]) = Year(Format([Forms]![F_A]![対象日]))
AND Month([試験開始日]) = Month(Format([Forms]![F_A]![対象日]))

フィールド：IIf([[Forms]![F_A]![月で出力]=True,True,[試験終了日]>=[Forms]![F_A]![対象日]
抽出条件：True AND Year([試験開始日]) = Year(Format([Forms]![F_A]![対象日]))
AND Month([試験開始日]) = Month(Format([Forms]![F_A]![対象日]))

と二つのフィールドを設けて意図するデータを抽出する事が出来ました。

お手を煩わせましたが何とか出来て良かったです・・・・