-PR-
解決済み

Access2000での複合検索について

  • 困ってます
  • 質問No.16427
  • 閲覧数93
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 42% (18/42)

「体力テスト結果・年齢・性別」というテーブルを元にしたフォームがあり、そこには、老若男女全てのデータがあります。

このフォームを元に、男女別、年齢別の検索フォームを作ろうとしています。
例えば、20歳から30歳までの男性のデータ
41歳から43歳までの女性のデータ
というふう検索したい。

現在、下記のような形で、年齢別については、うまくできたのですが、男女別がうまくいきません。

どうすればよいか、ご教示願えないでしょうか?

男女別のデータ型は、Yes/No型(Boolean型)で、
フォーム上では、男性に、チェックマークが入る形に
なっています。
また、検索フォーム上では、オプショングループ(二者択一のラジオボタン)でできれば、と思っています。

よろしくお願いします。

Private Sub 検索実行_Click()
On Error GoTo Err_検索実行_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "体力テスト結果・年齢・性別"
stLinkCriteria = "[年齢] Between " & Me![開始年齢] & " And " & Me![最高年齢]
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_検索実行_Click:
Exit Sub

Err_検索実行_Click:
MsgBox Err.Description
Resume Exit_検索実行_Click

End Sub
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

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

  • 回答No.1
レベル13

ベストアンサー率 46% (643/1383)

フォーム上に[性別選択]という名前のオプショングループがあるとすると、

stLinkCriteria = "([年齢] Between " & Me![開始年齢] & " And " & Me![最高年齢] & ")" _
  & " AND ( [性別] = " & IIf(Me![性別選択]=-1,"Yes","No") & ")"

ってな感じでOKだと思います。

オプショングループの値は、「男」が-1,「女」が0にしておきます。

参考:AccessのMDB形式の場合、Yes=-1, No=0 です。
従って、上式の
IIf(Me![性別選択]=-1,"Yes","No")
の部分は、単純に
Me![性別選択]
にしてもいいです。

何かありましたら、補足をお願いします!
お礼コメント
Cloes

お礼率 42% (18/42)

おかげさまで、解決できました。
どうもありがとうございます。
また、よろしくお願いします。
投稿日時 - 0000-00-00 00:00:00
関連するQ&A
-PR-
-PR-
このQ&Aで解決しましたか?
AIエージェント「あい」

こんにちは。AIエージェントの「あい」です。
あなたの悩みに、OKWAVE 3,500万件のQ&Aを分析して最適な回答をご提案します。

関連するQ&A
-PR-
-PR-
このやり方知ってる!同じこと困ったことある。経験を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


新大学生・新社会人のパソコンの悩みを解決!

いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ