Accessで、フォームにコンボボックスとサブフォームを作成してコンボボックスで選択したテキストをキーワードにサブフォームに選択クエリを表示させようと考えています。
コンボボックスの項目は、値集合ソースでテーブルを設定して、選択された項目は、my_Text = Me.コンボ1.Textで取得して
クエリのSQL文を変更すればいいのかなぁ?って想像しています。
でも、サブフォームに設定したクエリのSQL文の変更の仕方が解りません。どなたか?詳しい方いらっしゃいましたら教えて頂けないでしょうか?宜しくお願い致します。
No.2ベストアンサー
- 回答日時:
#1です。
よく考えたら、Filterで設定出来るのは、WHERE句に限られていますので、#1の方法は万能ではないですね。別の方法として、RecordSourceに直接SQLをいれるやり方です。
例:
Private Sub コンボ0_AfterUpdate()
If "" & Me.コンボ0 = "" Then
Me.埋め込み0.Form.RecordSource = "SELECT * FROM T1"
Else
Me.埋め込み0.Form.RecordSource = "SELECT * FROM T1 WHERE F2 = " & Me.コンボ0
End If
End Sub
No.1
- 回答日時:
サブフォームのFilterを設定する方が簡単だと思います。
例:
Private Sub コンボ0_AfterUpdate()
If "" & Me.コンボ0 = "" Then
Me.埋め込み0.Form.FilterOn = False
Else
Me.埋め込み0.Form.Filter = "F2 = " & Me.コンボ0
Me.埋め込み0.Form.FilterOn = True
End If
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・一回も披露したことのない豆知識
- ・これ何て呼びますか
- ・チョコミントアイス
- ・初めて自分の家と他人の家が違う、と意識した時
- ・「これはヤバかったな」という遅刻エピソード
- ・これ何て呼びますか Part2
- ・許せない心理テスト
- ・この人頭いいなと思ったエピソード
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・あなたの習慣について教えてください!!
- ・ハマっている「お菓子」を教えて!
- ・高校三年生の合唱祭で何を歌いましたか?
- ・【大喜利】【投稿~11/1】 存在しそうで存在しないモノマネ芸人の名前を教えてください
- ・好きなおでんの具材ドラフト会議しましょう
- ・餃子を食べるとき、何をつけますか?
- ・あなたの「必」の書き順を教えてください
- ・ギリギリ行けるお一人様のライン
- ・10代と話して驚いたこと
- ・家の中でのこだわりスペースはどこですか?
- ・つい集めてしまうものはなんですか?
- ・自分のセンスや笑いの好みに影響を受けた作品を教えて
- ・【お題】引っかけ問題(締め切り10月27日(日)23時)
- ・大人になっても苦手な食べ物、ありますか?
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・都道府県穴埋めゲーム
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Access の SetFocus について教...
-
Accessクエリで、予定した日付...
-
Accessレポートのチェックボッ...
-
accessでlaccdbファイルが削除...
-
Access IF文でテーブルに存在し...
-
【アクセス】DSumで複数の条件
-
Accessでフォームに自動入力し...
-
Access Error3061 パラメータが...
-
Access レポート印刷するときに...
-
access2021 強制終了してしまう
-
access2021 VBA メソッドまたは...
-
ACCESS VBA でのエラー解決の根...
-
Access VBA [リモートサーバー...
-
アクセスで作成したマクロの印...
-
Accessのことで教えてください...
-
Access VBA を利用して、フォル...
-
accessデータを指定したExcel、...
-
Microsoft365にAccessってあり...
-
Access 複数条件検索の設定が上...
-
Accessのクエリで、replace関数...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Access コンボボックスの値を...
-
Access 複数条件検索の設定が上...
-
コンボとセットの違い
-
Access パラメータークエリ VBA...
-
アクセスのコンボボックスの重...
-
access vba コンボボックス 読...
-
コンボボックスの値が変更され...
-
コンボ ボックスの高さ
-
ControlTypeの切り替えはデザイ...
-
VBAで検索した結果をコンボボッ...
-
アクセス コンボボックス VBA
-
MP3が聞けるオーディオコンボ
-
アクセス2003 検索で空欄入力...
-
内蔵CDコンボドライブの交換方法
-
闇バイトの応募はおとり捜査で...
-
「ぱーりない」「パーリナイ」...
-
ラテン語で「闇」を意味する単...
-
梶井基次郎の「闇の絵巻」という...
-
ヒロアカのオールマイトは何で...
-
家系が途絶える事は悪い事か
おすすめ情報