新しく質問する

フォームでのデータ検索

役に立った:2件
  • 質問者:isumi
  • 投稿日時:2003/09/30 21:12
  • 困り度:すぐに回答が欲しいです
  • 友達に紹介
  • ブログに書く
  • 教えて!gooお気に入り

ACCESS 2000 OSはWin2000を使っています。

フォーム内にコード検索の枠とボタンを作成して、データを検索しています。

フォームには個人データが表示されており、検索枠に個人コード(例えば:00131)を入力して検索ボタンを押すとフィルタがかかるようになっています。

VBAのコードを書いていて、他のフォームで同様のことをするとうまくいくのですが、このフォームではどうしてもうまくいきません。
しかも個人コードではなく、もう一つ別のコードなどで検索をかけるとうまくいったりします。
どうしてこのような問題が発生するのでしょうか?
そして、どうすれば解決できるのでしょうか?
どなたか、ご教授お願いします。
下記にVBAコードも表示させておきます。

Private Sub 個人NO検索_bt_Click()
 Me.Filter = "[個人NO] Like " & Me.[個人NO検索]
 Me.FilterOn = True
End Sub

個人NO:個人NOがあらかじめ表示されているテキストボックスです。
個人NO検索:検索したい個人NOを入力するところです。

この質問への回答は締め切られました。
このQ&Aは役に立ちましたか?(役に立った:2件)
  • 参考になった:0件

No.1ベストアンサー20pt

  • 回答者:ARC
  • 回答日時:2003/09/30 21:25

個人Noって数値型でしょうか?
それならば、Likeを使うのはちょっと違ってるような気がします。

Me.Filter = "[個人NO] =" & Me.[個人NO検索]

では駄目でしょうか。
個人番号が文字列型で、Likeを使うんであれば、

Me.Filter = "[個人NO] Like '" & Me.[個人NO検索] & "'"

とすべきかと思います。

通報する

この回答へのお礼

テキスト型にしていたので、後者でうまくいきました!
VBA初心者なので、数値型とテキスト型の検索で=とlikeが違うのは勉強になりました。

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

  
このQ&Aは役に立ちましたか?(役に立った:2件)

このページのトップへ

Facebook公式ページ

公式Twitter