
いつもお世話になっております。ちょっと困っています。AV資料の管理にAccessを利用していますが、曖昧検索をしたいので、クエリで、
Like "*" & [筆者・監督名は?:] & "*"
で監督名に"黒沢"と入力すると、きちんと表示されますが、あいまい検索の項目を増やすと、例えば、
邦題タイトルとか、同じように
Like "*" & [邦題は?:] & "*"
なんて検索しようとし、ただし、その部分に何も入れないで先程の監督名に"黒沢"と入れると、なぜか、件数が減ってしまいます。原因としては、邦題の部分で何もない場合には何も表示されなくて、邦題と監督名にきちんと入っていれば、監督名検索でHITします。
これをあいまい検索複数で、監督名だけで、全ての件数(邦題が空白でも表示)が表示されるようにするには、クエリ部分でどのように表示させればいいのでしょうか?
分りにくい内容ですが、どなたかお知恵をお貸し下さい。
No.6ベストアンサー
- 回答日時:
ちょっとだけ解説。
ワイルドカードをヘルプで調べると、
「*」は0文字以上の文字列 とあります。
Null は文字列ではないので Like '*' ではヒットしません。
Nz は Null値を置き換える関数です。
Nz([邦題],"") は
IIf(IsNull([邦題]),"",[邦題]) と同じです。
Nz([邦題],"") を Like "*" & [邦題は?:] & "*"
で検索すると、元Nullのものが、"" になっていますから
[邦題は?:] に未入力で全件ヒットになります。
No1さんの
[邦題]を Like "*" & [邦題は?:] & "*" Or Is null
で検索でもよさそうですが、
監督名が未入力で、邦題を入力した場合に
余計なものがヒットしてしまいます。
試行錯誤しながら、どうもNULLの場合の処理がおかしいと気付いたのですが、アクセスは得意ではないので、どのようにかけばいいのか悩んでましたが、どうにかめどが立ちました。
ありがとうございます。今回NZ関数を覚えた事で、NULL値を強制的に""にする事でHITできるなんて、技を教えて頂いて、感謝しております。暫く、そのままにしておりますが、私以外にも参考になったかた多いと思います。大変勉強になりました。ありがとうございます。
No.7
- 回答日時:
なるほど、bonaronさんやm3_makiさんのことがただしいですね。
変更するとSQL文が簡単になるのと、前のバグがなおりますね。
-------------------------------------------------
SELECT Authority1,Title1
FROM (SELECT Nz(Authority,"") AS Authority1,Nz(Title,"") AS Title1 FROM ITEM_TBL)
WHERE Authority1 Like "*" & [著者・監督名は?:] & "*" AND Title1 Like "*" & [邦題は?:] & "*"
-------------------------------------------------
No.5
- 回答日時:
邦題タイトルのフィールド名を「邦題」とします。
クエリにフィールドを追加。
フィールド:Nz([邦題],"")
抽出条件: Like "*" & [邦題は?:] & "*"
他の文字列の項目で Nullの可能性があるものは
同じパターンで。
この回答への補足
今までNZでフィールドを追加した事がないのですが、
Nz([邦題],"") と言う項目をフィールに追加するには、どのようにすればいいのでしょうか?
クエリには、現在あるものしか追加した事なくて、
Nz([邦題],"")と言う名前を追加してもエラーになってしまいます。
簡単な操作だとは思うのですが、どうもうまくできません。どのような手順でNz([邦題],"")と言うフィールドを作成できるかご教授くださいませ。
出来ました。何だか混乱しましたが、
邦題1:Nz([邦題],"")
と入力したら邦題の部分で未入力にしても、"黒沢"と言う文字で検索もきちんとでき、かつ、邦題の部分に適当な文字を入れてもHITするようになりました。
ありがとうございます。
後一息です。ありがとうございました。
No.4
- 回答日時:
1.筆者・監督名のテーブルでのカラム名をAuthority
2.邦題のカラム名をTitle
3.テーブル名をITEM_TBL
とします。
まずVBAで関数を2個作ります。中身は一緒ですがAuthorityとTitleの二つがあるので、2個です。
---------------------------------
'モジュールレベルの変数を4つ作ります。
Private iCount1 As Integer '何回目の呼び出しかを覚えておくための変数
Private strData1 As String '入力されたデータ保持用
Private iCount2 As Integer
Private strData2 As String
Function myQuery1(strCondtion As String) As String
If strCondtion1 = "**" Then
myQuery1 = ""
iCount1 = iCount1 + 1
Else
If iCount1 = 0 Then
myQuery1 = strCondtion1
strData = strCondtion1
iCount1 = iCount1 + 1
Else
iCount1 = 0
myQuery1 = strData
End If
End If
End Function
'
Function myQuery2(strCondtion As String) As String
If strCondtion2 = "**" Then
myQuery2 = ""
iCount2 = iCount2 + 1
Else
If iCount2 = 0 Then
myQuery2 = strCondtion2
strData = strCondtion2
iCount2 = iCount2 + 1
Else
iCount2 = 0
myQuery2 = strData
End If
End If
End Function
---------------------------------
ここまでできたら後はSQL文です。
考え方としてはNullのデータもまず取り出し、その後Nullを""の0文字列に変更してあいまい検索にかけます。
SQL文-----------------------------
SELECT Authority1,Title1
FROM ( SELECT IIF(Authority IS Null,"",Authority) AS Authority1,IIF(Title IS Null,"",Title) AS Title1 FROM ITEM_TBL WHERE (Authority Like myQuery1("*" & [筆者・監督名は?:] & "*") OR Authority IS Null) AND (Title Like myQuery2("*" & [邦題は?:] & "*") OR Title IS Null))
WHERE Authority Like myQuery1("") AND Title Like myQuery2("")
----------------------------------
うまく動かないときは、レスいただければ幸いです。
ありがとうございます。
ここまで考えていませんでした。
でも折角なので実際に当てはめてみますねぇ。
ここまで考える程の技術はありませんが、折角のご好意使わせて頂きます。
まずはお礼まで、
ありがとうございます。
No.2
- 回答日時:
質問の意味が良く理解できて居ないのかも知れませんが・・・
> Like "*" & [筆者・監督名は?:] & "*"
Like "*" & Nz([筆者・監督名は?:],"") & "*"
> Like "*" & [邦題は?:] & "*"
Like "*" & Nz([邦題は?:],"") & "*"
にしては、どうでしょう?
空白(Null値)の時に、「結果が出ない」、「件数が変らない」のどちらでもなく、「件数が減る」と言う理由が今ひとつ理解できないのですが・・・
And なら「結果が出ない」
Or なら「件数が変らない」
だと、思うのです。
この回答への補足
クエリの中で
Like "*" & [筆者・監督名は?:] & "*"
だけだと22件でるのですが、この他にも抽出項目があり、
Like "*" & [邦題は?:] & "*"
と言う項目も同じ用に設定し、
そこに何も条件を設定しないで通すと、
22件でると思ったら、5件しかHITしなかったんですよねぇ。
邦題の部分で何かしら文字がある場合に抽出されて、そうでない(何もない)場合では、HITしなくて、どうすれば、邦題に何もない場合でも抽出されるのかと思案してました。
NO1さんのお陰で無事思ったような事ができました。
所でこのNzと言うのは何か意味があるのでしょうか?
初めて見る書き方なのですが、教えていただけないでしょうか?お手数おかけしてすみません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
Accessクエリ 複数フィールドを対象に空白の場合は全件表示したい
Access(アクセス)
-
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
ACCESS クエリの抽出条件で全てを抽出したい
PowerPoint(パワーポイント)
-
-
4
IIF関数の使い方
Visual Basic(VBA)
-
5
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
6
2つのテーブルに共通するレコードを削除したい
Access(アクセス)
-
7
ACCESSのクエリー抽出条件にIIFを使用して
Access(アクセス)
-
8
Access 同じデータをたくさんのレコード(同一列)に一度に入力するには
Access(アクセス)
-
9
フィルタ後のフォームの件数の取得の仕方
Access(アクセス)
-
10
ACCESSでスペースの抽出
Access(アクセス)
-
11
【ACCESS】フォーム名/コントロール名を文字列型変数で指定するには
Access(アクセス)
-
12
Access サブフォームでの選択行の取得
その他(データベース)
-
13
access別のテーブルを参照してテキストボックスに値を表示、編集したい
Access(アクセス)
-
14
Accessで埋め込んだサブフォーム(データシート形式)でデータ追加ができない
Access(アクセス)
-
15
Accessでフォームから別フォームのテキストボックスの値を設定する
Visual Basic(VBA)
-
16
Access 複数条件検索の設定が上手く行きません
Access(アクセス)
-
17
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
18
AccessからExcelにエクスポートする時に常に上書きしたい
Excel(エクセル)
-
19
[Access]帳票フォームにて連続する非連結コントロールに個々の値を入れるには
Access(アクセス)
-
20
accessで空白の時の抽出
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessのクエリで、あいまい検...
-
有頂天ホテル、YOUの歌ったタイ...
-
Excel2003で、映画の邦題と原題...
-
映画原題の意味(フランス語)
-
この映画のタイトルわかる人い...
-
ハリー・ポッターとロードオブ...
-
キャンプ・キキワカにルークが...
-
結局、「アリータ・バトル・エ...
-
森本梢子さんの「わたしがママ...
-
続編映画タイトルのバリエーシ...
-
映画の舞台挨拶って上映前?上...
-
キューブリック「時計じかけの...
-
桜木がアメリカで活躍
-
オススメの邦画
-
映画のロケ地訪れたことはあり...
-
20代後半の女性がひとりでド...
-
教えてください!
-
年間、どれくらいの数の映画を...
-
オードリー・ヘプバーンについて
-
タイトル教えてください!洋版...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Accessのクエリで、あいまい検...
-
有頂天ホテル、YOUの歌ったタイ...
-
「リプレイスメント」の曲
-
映画原題の意味(フランス語)
-
Excel2003で、映画の邦題と原題...
-
「日々是好日」の英訳をお願い...
-
映画の舞台挨拶って上映前?上...
-
ハリー・ポッターとロードオブ...
-
20代後半の女性がひとりでド...
-
映画のエンドロール観る派?観...
-
ロード・オブ・ザ・リングのラスト
-
どこからが告白なのか?
-
続編映画タイトルのバリエーシ...
-
結局、「アリータ・バトル・エ...
-
161cmの男って振られるしかない...
-
「ボクを包む月の光」を読んで…
-
フォレスト・ガンプのステッカ...
-
Amazonプライムの「フリークス...
-
mother4のダウンロード方法教え...
-
キャンプ・キキワカにルークが...
おすすめ情報