
アクセスのクエリにおいて、クエリを実行するたびに、ダイアログボックスが自動で開き、条件を変えてレコードを抽出することできます。ただ、抽出条件を入力する際に、一つのダイアログボックスに一つの条件しか入力できないのを、一つのダイアログボックスで二つ以上の条件を設定し、そのうちの一つを入力すれば、抽出できないか、教えていただく存じます。
例えば、住所・氏名・生年月日のデータから、クエリを実行するたびに、一つのダイアログボックスで、住所、または氏名、生年月日の3つのうちのどれか入力すれば、それに該当するレコードを抽出できるという感じにしたいのです。
自分では、一つのダイアログゴックスで、住所を入力すれば、レコードを抽出できるという感じまでは、出来るのですが・・・。また、一つのダイアログボックスを三回入力(二回は何も入力せず・一回に条件を入力する)すれば、出来るという感じまでも、出来たのですが、三回入力するのが手間なので、なんとか一度で出来ないか思案しております。
よろしくお願い致します。
No.4ベストアンサー
- 回答日時:
No3回答者です。
>「クエリのデザイン画面で、下記のフィールドを追加します。
> 検索データ: [住所] & [氏名] & [生年月日]」
>とかかれていますが、わかりません。
Accessのバージョンが不明ですが、
下記のHPを説明に利用したいと思います。
http://www.seta.media.ryukoku.ac.jp/manual/offic …
クエリのデザインビューの画面は上記のページの、
「4:選択クエリ・・・」の下の画像です。
上半分にテーブルの一覧があり、下半分にフィールドの一覧があります。
必要なテーブル、フィールドは既に追加されているとします。
「フィールドを追加する」とは、下半分のフィールドの一覧の
空欄にデータを追加する事です。
上記の図で説明すると、矢印の先に「学部コード」と言う
フィールドがありますが、その右となりの空欄の事です。
フィールドの空欄に、下記のデータを追加します。
空欄の中に下記の一行の内容を全て記述して下さい。
検索データ: [住所] & [氏名] & [生年月日]
ここでいったんデータシートビューで確認してみて下さい。
クエリに「検索データ」と言うフィールドが追加され、
内容は、住所・氏名・生年月日が結合されていると思います。
簡単に説明すると、 : の前の「検索データ」がフィールド名で、
後の式が、フィールドのデータになります。
デザインビューに戻り、この追加したフィールドに、
パラメータを使った抽出条件を記述します。
これで伝わるでしょうか?
わかり難い点があれば、補足欄で質問して下さいね。
本当に詳しく教えていただいてありがとうございます。
まさかフォールドにこんなに長い文章を自分で入力するとは、
思っていなくて、最初の回答でわかりませんでした。
本当に親切に教えていただいて感謝しております。
もう一つの質問でもお世話になりました。
No.3
- 回答日時:
クエリのパラメータはお手軽ですが、
残念ながら細かい制御は出来ません。
3つの条件を1画面で入力する場合、既に回答出てますが、
フォームを作成するのが一般的だと思います。
しかし、どうしてもパラメータクエリで実現したいと言うのなら、
下記のような方法もあります。
--------------------------------------------------------
クエリのデザイン画面で、下記のフィールドを追加します。
検索データ: [住所] & [氏名] & [生年月日]
そのフィールドの抽出条件を下記の様にします。
Like "*" & [条件を入力] & "*"
[条件を入力]がパラメータです。
この方法は、かなり曖昧な検索になります。
[住所]か[氏名]か[生年月日]に、条件の文字列が含まれていれば
抽出対象となります。
--------------------------------------------------------
別の方法。
クエリのデザイン画面で、下記のフィールドを追加します。
検索データ: [住所] & ":" & [氏名] & ":" & [生年月日]
そのフィールドの抽出条件を下記の様にします。
Like [条件を入力]
この方法は、先ほどよりはキッチリと検索出来ますが、
条件の文字列を入れる際に工夫が必要です。
例えば、住所が「東京都」で始まるレコードを選択
東京都*
例えば、氏名が「山田花子」のレコードを選択
*:山田花子:*
例えば、住所が「東京都」で始まり、12月生まれのレコードを選択
東京都*:*:*/12/*
Like演算子の知識が必要ですが、色々な条件を1画面で入力可能です。
区切り文字は : 以外でもOKですが、住所、氏名、生年月日に
使用されていない文字を選んで下さい。
--------------------------------------------------------
上記の2つの方法は、検索対象となるデータを文字列として連結し、
強引に1つのデータにまとめています。
パラメータは1つで済みますので、ダイアログも1つです。
あまりお勧めの方法ではないですが、こういう手も有りますね。
回答ありがとうございます。
ご親切に詳しく書いていただいて、恐縮です。
もしよろしければ、もうちょっと教えていただけますでしょうか?
「クエリのデザイン画面で、下記のフィールドを追加します。
検索データ: [住所] & [氏名] & [生年月日]」
とかかれていますが、わかりません。
教えていただけますか?
No.2
- 回答日時:
アクセスのパラメータクエリは、条件を付けるフィールド(デザイングリッドで)のその列に[メッセージ」で書き込みます。
すなわちフィールドはあらかじめ決めなければなりません。2フィールド以上の指定はできますが。そういうことで初級教科書のレベルでは、質問のことはできません。
ーー
しかしアクセスの選択クエリ等は背後にSQLがあると考えることができます。SQL文のWHERE以下で指定します。
条件で絞るにはWHERE 項目=X の項目とX(値)の指定は絶対必要です。
初級教科書のレベルでは項目は、クエリの表示以前に決まっているわけですからXだけの入力でよい。
しかし項目も相対化したいとなるとそれの指定のためのコントロール
1つ、値を入力するコントロールを1つ必要です(カンマで両者を区切るななんてこともできましょうが)
そして応答をテキストで捉えて、その文字列をSQL文のWHERE以下に
切り貼りして埋め込みます。数字が条件の場合は数値化も必要です。
そして正しいSQL文の文字列を作ったらSQL文を実行します。
そうなるとモジュールの世界になります。(RunSQLではSelect文は実行できません。参考
http://office.microsoft.com/ja-jp/access/HA01226 …)
設定したSQLを実行するのは(簡単な実例ですが、
s = "[社員V].氏名='山田次郎';"の部分は、書き換えた後のものと考えてください。)
アクセスのクエリでやる方法です
(対する考え方は、フォームに絞った結果を出す方法です。)
この辺は改めて、「SQLの実行」ということで、勉強してください。
Function ChangeSQL()
Set daoDB = DBEngine.Workspaces(0).Databases(0)
Dim MyQuery As Object 'QueryDef
Set MyDB = CurrentDb()
' QueryDef 変数を編集のために開きます。
Set MyQuery = MyDB.QueryDefs("社員V クエリ クエリ")
' SQL 文を変更します。
s = "[社員V].氏名='山田次郎';"
MyQuery.SQL = "SELECT [社員V ].氏名,[社員V].計数1,[社員V].計数2 FROM [社員V] WHERE " & s
' 更新したクエリーを実行します。
DoCmd.OpenQuery "社員V クエリ クエリ"
End Function
sを
s = "[社員V].コード='444';"
として実行するとそしてクエリを手動で開くと、コードが444(文字列)のクエリが実行されてました。
親切にたくさん書き込みして頂いてありがとうございます。
ただ、自分は初心者で、読んだのですがあまり理解できません。
これから勉強して、理解できるようにがんばります。
ありがとうございました。
No.1
- 回答日時:
Accessが自動で出すパラメータ要求ダイアログではひとつのパラメータしか入力できません
3つ一度に入力させるようなものはフォームを使って作成するしかないですね
もちろんクエリを実行させたからといってこのフォームを自動的に開いてくれたりはしません
フォームを開いて条件を入力してから、クエリを実行させるという手順になります
やっぱりひとつのパラメーターしか入力できないのですね。ありがとうございました。
「フォームを開いて条件を入力してから、クエリを実行させる」が全くわかりませんが、勉強してみます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Sheet3から2つの条件でオートフィルターで抽出した個数をSheet2へ入力するマクロで、一つ目の 4 2023/01/12 23:40
- Access(アクセス) アクセスの更新クエリでカレントレコードのみ更新したい 1 2022/06/02 23:32
- Access(アクセス) accessの日付フィールドから前年度だけを取り出したい 3 2022/04/13 23:13
- Access(アクセス) Accessのクエリの結果を、既存のエクセルに追加したい 2 2022/07/31 22:44
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- Visual Basic(VBA) 前回ご教授いただいたコードに覚えたてのループ処理で品名りんごAから順に20回for nextでループ 7 2023/01/13 22:01
- Visual Basic(VBA) Sheet2からオートフィルターで売上日を抽出した件数をカウントし、その件数をSheet1のセルB1 2 2023/01/12 12:24
- Access(アクセス) アクセス where句を使用して複数条件抽出をするには 2 2022/08/29 13:24
- Access(アクセス) access レポート 請求書について 2 2022/07/04 22:52
- Excel(エクセル) Excel 売上管理シートに入力した売上データを、日報に自動反映させたいと考えています。 売上管理シ 3 2023/04/29 18:08
このQ&Aを見た人はこんなQ&Aも見ています
-
Access 同じデータをたくさんのレコード(同一列)に一度に入力するには
Access(アクセス)
-
アクセスのパラメータ入力画面をリストまたはコンボボックスにする方法
Access(アクセス)
-
テキストボックスにクエリ結果を表示させたい
その他(データベース)
-
-
4
ACCESSでの文字と数字の結合について
Access(アクセス)
-
5
特定セルの内容を更新したら、その更新日を自動的に表示する方法について
Excel(エクセル)
-
6
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
7
エクセルVBAでアクセスファイルを開く方法
Access(アクセス)
-
8
ACCESS2007 フォーム 「バリアント型でない変数にNull値を代入しようとしました」エラーの
SQL Server
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
コントロールの違う複数条件
-
Accessのクエリーのゼロデータ...
-
Accessクエリで特定の行を削除...
-
ACCESS2000 クエリの抽出条件に...
-
Access Left$関数で全角半角が...
-
Access2007でSQLの複数列副問い...
-
access2000での抽出条件
-
Access クエリで連結する文字...
-
Access:固定長文字列ファイル...
-
ACCESS クエリの抽出項目をEXCE...
-
ACCESS クエリ 抽出条件が多い場合
-
SQLのLIKE検索で清音と濁音/半...
-
Accessクエリ特定文字列のカウ...
-
access2019 チェックボックスと...
-
Accessクエリで年月フィールド...
-
アクセスで任意の件数を抽出す...
-
Access からのラベル作成時、一...
-
差込印刷で顧客別に複数行のデ...
-
ACCESSでデータ変更箇所が分か...
-
「#エラー」の回避
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Accessのクエリーのゼロデータ...
-
Accessクエリで特定の行を削除...
-
access2019 チェックボックスと...
-
Access2007でSQLの複数列副問い...
-
Access クエリで連結する文字...
-
アクセスのフィルタ nullにつ...
-
Accessのデータの一部を削除す...
-
Accessクエリで年月フィールド...
-
Access Left$関数で全角半角が...
-
Accessのクエリで1フィールドの...
-
Access:固定長文字列ファイル...
-
ACCESS クエリ 抽出条件が多い場合
-
アクセスで任意の件数を抽出す...
-
accessで空白の時の抽出
-
Access2003 削除クエリで式1フ...
-
AccessからExcelへの条件付エク...
-
SQLのLIKE検索で清音と濁音/半...
-
access(アクセス):パラメータ...
-
sqlserverで書式チェックしたい
-
access2000での抽出条件
おすすめ情報