Access VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1958 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【4445】レコード抽出について たくぽ 05/2/22(火) 16:05 質問[未読]
【4447】Re:レコード抽出について クロ 05/2/22(火) 16:24 回答[未読]
【4460】Re:レコード抽出について たくぽ 05/2/24(木) 10:59 お礼[未読]
【4445】レコード抽出について
質問  たくぽ  - 05/2/22(火) 16:05 -
引用なし
パスワード
   すみません、よくわからないので、以下のご回答お願いします。

例えば。。。

１〜５　　 を １
６〜１０　 を ２
１１〜１５ を ３　のように、範囲でコード値を振っています。

で、フォーム上で、コンボボックスから「１〜５」「６〜１０」「１１〜１５」のように
選択し、抽出ボタンを押下でその範囲内の値をフォームに表示したいのですが、その場合、どのようにしたらいいのかさっぱり分かりません。

初心者申し訳ないのですが、教えてください。
【4447】Re:レコード抽出について
回答  クロ  - 05/2/22(火) 16:24 -
引用なし
パスワード
   コンボボックス(仮称cmbA)のプロパティで
値集合タイプ:値リスト
値集合ソース:"１〜５";1;"６〜１０";2;"１１〜１５";3
列数:2
列幅は適宜に変更

既にフォームのレコードソースとなるテーブル/クエリには
1〜3の値が数値型でフィールドA(仮称)に入っているものとします。

抽出ボタン(コマンドボタン)のクリック時のイベントにコード(イベント
プロシージャ)で

Me.Filter = "[フィールドA]=" & Me.cmbA.Column(1)
Me.FilterOn = True

でどうでしょうか？
【4460】Re:レコード抽出について
お礼  たくぽ  - 05/2/24(木) 10:59 -
引用なし
パスワード
   なんとかできました！

もっともっと勉強しなくちゃ！ですね・・・

ご回答、ありがとうございました。
本当に助かりましたっ。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1958 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078265
(SS)C-BOARD v3.8 is Free