こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

クエリ「あいまい検索」該当レコードなし時の設定

[質問素材の作成環境]ソフト名:Access2007になります。

[やっていること]
1,クエリの「抽出条件欄」に下記の「パラメータ」を記述してフリー検索できる様にしています。「Like "*" & [情報検索「食材・メニュー・一文字可」] & "*"」

2,フォーム「レシピ食材情報フォーム」の「レコードソース」欄に、クエリ「レシピ食材情報クエリ」を設定しています。「生活情報メインフォーム」上のコマンドボタンで「検索キーワード入力窓」を表示させ、入力後に「レシピ食材情報フォーム」が起動し検索結果を表示しています。

3,オブジェクトの構成
・テーブル:名前「レシピ食材情報テーブル」(レコード:ID、種類、種別、内容、情報)
・フォーム:名前「生活情報メインフォーム」
・フォーム:名前「レシピ食材情報フォーム」
・クエリ:名前「レシピ食材情報クエリ」(レコード:ID、種類、種別、内容、情報)
・検索条件レコード:情報

[困りごと(希望)]
ヒットしない時「該当するレコードがない時」、何の活字も表示されない無地のフォームで起動しますので、「該当するレコード」がないときは無地の「レシピ食材情報フォーム」を開かず、ダイアログメッセージで「該当データがありません」”が表示できればと思います。

[やりたいこと(期待)]
ダイアログ「コマンドボタン付き」でメッセージを表示して、ダイアログの「コマンドボタン」をクリックすると、「生活情報メインフォーム」を元に戻して「検索動作」が可能になる様にしたいと思います。※現在は、「生活情報メインフォーム」のコマンドボタンをクリックし「レシピ食材情報フォーム」を表示させた時点で、「生活情報メインフォーム」は最小化しています。要望が難しい場合は、「生活情報メインフォーム」を最小化しない方法を視野に入れます。

以上ですが、難易度が分からないでアドバイスを求めています点、ご理解をお願いします。

投稿日時 - 2017-03-15 14:56:33

QNo.9305373

困ってます

質問者が選んだベストアンサー

http://www.accessclub.jp/bbs3/0329/superbeg99652.html
の記事を参考に、表示すべきレコードが無い場合の対処をして下さい。

投稿日時 - 2017-03-15 16:28:26

補足

chie65535 レベル14様へ  取り急ぎ状況をご案内いたします。

以下の記述を「レシピ食材情報フォーム」の読み込み時に書き込みました。結果は、「生活情報メインフォーム」は開きませんでしたが、該当するレコードが無いと「レシピ食材情報フォーム」は表示されず、Msgboxの文言は正常に表示され、「生活情報メインフォーム」が開かない以外に動作に問題はありませんでした。

Private Sub Form_Load()
Dim IntR As Variant
IntR = Me.Recordset.RecordCount
If IntR = 0 Then
Forms.レシピ食材情報フォーム.Visible = False
MsgBox ("登録された情報はありません")
DoCmd.Close acForm, "レシピ食材情報フォーム"
Docmd.OpenForm "生活情報メインフォーム"
End If
End Sub

そこで、マクロの設定(下記)のIとIIの「(2)と(3)」を一旦削除しました「質問時点の記述に選択肢としていた経緯もあり」。

[マクロの初期設定]
I、「生活情報メインフォーム」コマンドボタンの設定
(1)フォームを開く:レシピ食材情報フォーム
(2)オブジェクトの選択:生活情報メインフォーム
(3)最小化
II、「レシピ食材情報フォーム」の閉じるボタンの設定
(1)閉じる:レシピ食材情報フォーム
(2)オブジェクトの選択:生活情報メインフォーム
(3)元のサイズに戻す

あくまでも希望ですが、もし、可能であれば「"生活情報メインフォーム"」の最小化と「"生活情報メインフォーム"」の元に戻せればと思います。

ご判断の程、宜しくお願いします。

投稿日時 - 2017-03-15 19:12:33

お礼

chie65535 レベル14様へ
質問させていただいた時点での環境が得られて居りますので、補足コメントせずにお礼申し上げるのが筋でした。お尋ねすることがあれば、新たな質問として投稿いたします。ありがとうございました。

投稿日時 - 2017-03-17 13:35:26

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(3)

ANo.3

検索キー情報検索「食材・メニュー・一文字可」 は別のフォームに配置しますのでフォーム名で修飾する必要があります。
「Like "*" & forms!生活情報メインフォーム[情報検索「食材・メニュー・一文字可」] & "*"」

投稿日時 - 2017-03-17 12:51:28

お礼

chayamati レベル12様へ
ありがとございます。ご親切に対応いただきまして、貴方様の気持ちが伝わります。ありがとうございました。

投稿日時 - 2017-03-17 13:32:09

ANo.2

今日は。
「Like "*" & forms!生活情報メインフォーム[情報検索「食材・メニュー・一文字可」] & "*"」

補足
前回 回答の 追加です。
2.クエリデザイン
クエリはフォーム、レポートに内蔵させる事が出来るので一時的に使用するものと思います。
[作成]→[クエリデザイン]でクエリのデザイン画面になります。
※画面は上下2段になっています。上段に使用する元データを下段にフィールド名に配置します
→[外国人情報、Shift+分類マスタ]→[追加]→[閉じる]
※これでここで使用するテーブルがかくてします、次に必要なフィールドを一つ一つドラッグ
→[国地域マスターの国地域名とフリガナをドラッグ]→[分類マスタの分類名をドラッグ]
→[外国人情報の情報をドラッグ]
※表示の並び順と表示コントロール
→[フリガナの並べ替え行の右端クリックから昇順]→[フリガナの表示行のチェック外す]
※抽出条件設定
抽出条件の記入行は複数行あり同一行で記述するとand条件違う行で記述するとor条件
記述は各フィールド列で=[国地域名]のように記述 []内の名前のボックスがアクティブ(開いている)」
検索内容は.事前に確定している必要から、ボックスをフォーム名で修飾します。
forms!メニュー![国地域名]
尚あいまい検索はLike [地域頭] & "*"
の追加です

投稿日時 - 2017-03-16 18:20:46

お礼

chayamati レベル12様へ
ありがとございます。追っかけで対応いただきまして感謝いたします。私の方が通常のレスポンスで追従できていない証拠ですね。ありがとうございます。

投稿日時 - 2017-03-17 13:31:56

あなたにオススメの質問