Access VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

633 / 9994

←次へ　｜　前へ→


	【12671】Re:一つの条件で複数検索

kok - 14/12/19(金) 11:49 -


	引用なし

	パスワード

▼かるびのさん：

すみません。補足させていただきます。

>　フォームのレコードソースは何ですか。

「Q顧客名1」です。

>　レコードソースにはどんなフィールドがありますか。
>　それらフィールドのデータ型は何ですか。
>　コード１、コード２、コード３はテキストボックスだと思いますが、
>それぞれのコントロールソースは何ですか。

フォームヘッダーに、非連結のテキストボックスの「顧客番号入力」、「顧客名入力」、「コード入力」

ボタンの「検索ボタン」。
検索ボタンには下記のVBAを組んでいます。

Private Sub 検索ボタン_Click()
　　If Forms!F顧客一覧!顧客番号入力 <> "" Then
　　DoCmd.ApplyFilter "", "[Q顧客名1]![顧客番号] = [Forms]![F顧客一覧]![顧客番号入力]"
　　ElseIf Forms!F顧客一覧!顧客名入力 <> "" Then
　　DoCmd.ApplyFilter "", "[Q顧客名1]![顧客名] like '*" & [Forms]![F顧客一覧]![顧客名入力] & "*'"
　　End If
End Sub

実際この検索ボタンの中にコード入力の検索も組み込みたいと考えています。

詳細には、フィールド名、コントロールソース共同名のテキストボックス、「顧客番号」、「コード１」、「コード２」、「コード３」があり、
「顧客番号」、「顧客名」がテキスト型
「コード１」、「コード２」、「コード３」が数値型です。

この説明で大丈夫でしょうか？
お手数掛けすみません。

380 hits

▼

【12669】一つの条件で複数検索 kok 14/12/17(水) 14:37