ここから本文です

アクセス2007です。

ach********さん

2015/11/2015:16:54

アクセス2007です。

一つのフィールド「商品名」に 複数のワードをスペースで区切って検索したいのですが、

現在は下に記述のように、「商品名キー」フィールドに1単語を入力してコマンドボタンをクリックして抽出。紐付けされたサブフォームに該当商品が表示されるようになっています。
例えば 財布、ラウンド のように複数のワードを入れて両方のワードを含んでいる商品を抽出したいのですが、どう記述すれば良いでしょうか。
よろしくお願いします。

Private Sub 商品名検索_Click()
'[商品名]フィールドにフォーカスを移動
Me!商品名.SetFocus

'先頭レコードから検索
DoCmd.FindRecord Me!商品名キー, acAnywhere

'見つからなかったとき
If Me.Recordset.NoMatch Then
MsgBox "該当するレコードは見つかりません"

End If
End Sub

---------------------------------------------
Private Sub 次を検索2_Click()
'次のレコードを検索
Me.Recordset.FindNext "商品名 Like '*" & Me!商品名キー & "*'"

'見つからなかったとき
If Me.Recordset.NoMatch Then
MsgBox "該当するレコードは見つかりません"

End If
End Sub

閲覧数:
109
回答数:
1
お礼:
250枚

違反報告

ベストアンサーに選ばれた回答

hdu********さん

2015/11/2015:35:46

一発でやるなら

Me.Recordset.FindNext "商品名 Like '*" & replace(trim(Me!商品名キー)," ","*' and 商品名 Like '*") & "*'"

これでいける、たぶん。

個人的には、TrimしてSplitして配列にして管理する方が好きです。

質問した人からのコメント

2015/11/21 10:59:10

出来ました!ありがとうございました。

この質問につけられたタグ

みんなで作る知恵袋 悩みや疑問、なんでも気軽にきいちゃおう!

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問は選択されたID/ニックネームのMy知恵袋で確認できます。

不適切な投稿でないことを報告しました。

閉じる