実行時エラー '3464': 抽出条件でデータ型が

フォームにフィルタをかけようとすると
実行時エラー '3464': 抽出条件でデータ型が一致しません。

になります。

Private Sub Form_Load()
Me.Form.Filter = "フィールド1 =200"
Me.Form.FilterOn = True
End Sub

コードはこれです。
フィールド1はテキスト型です。
何がダメなのでしょう？

No.1 ベストアンサー 回答者： nicotinism 回答日時： 2013/04/11 22:37

Me.Form.Filter = "フィールド1 =200"

↓
Me.Form.Filter = "フィールド1 ='200'"
に変更してください。
フィールドのデータ型によって
テキスト型→ ' で括る
日付/時刻型→ # で括る
数値型 → 何も括らない。
と合わせる必要があります。

この回答へのお礼

ありがとうございます。

お礼日時：2013/04/17 21:02