Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

968 / 9994

←次へ　｜　前へ→


	【12330】Re:Access VBA OpenFormの抽出条件

hatena - 13/5/30(木) 16:20 -


	引用なし

	パスワード

▼kuma さん：
>Ｔ中止テーブルのテーブル名と項目名を見直して、
>コピペでＶＢＡに書き込みましたが、
>
>・DoCmd.OpenForm "Ｆ顧客", acNormal, , "NZ([Ｔ中止].[中止終了日],#1111/11/11#) <> #1111/11/11#"
>
>・DoCmd.OpenForm "Ｆ顧客", acNormal, , "[Ｔ中止].[中止終了日] Is Not Null"
>
>のどちらでも　パラメータの入力　[Ｔ中止].[中止終了日]
>のインプットボックスが出てしまいます。

ひょっとすると、Ｆ顧客のレコードソースは、Ｔ顧客で、中止終了日フィールドは含まれていないということかな？

で、対応するＴ中止の中止終了日に Null があったらその顧客は抽出しないということかな？

DoCmd.OpenForm "Ｆ顧客", acNormal, , "DLookup('顧客NO','Ｔ中止', '中止終了日 Is Not Null AND 顧客NO=' & [顧客NO]) Is Null"

これでどうだろう。サンプルで確認していないのでミスがあるかも。

考え方は、
DLookup で T中止から顧客NOが一致して中止終了日がNUllのレコードを検索→対象レコードがないとき NUll→結果がNullのレコートを抽出

527 hits

▼

【12321】Access VBA OpenFormの抽出条件 kuma 13/5/28(火) 9:24