質問: vbaによるフィルターでレコードを抽出するには レコードの抽出をマクロで行っております。 アクション欄に「フィルターの実行」を設定しwhere条件式に[氏名フリガナ] like [forms]![フォーム名]![抽出テキスト名] & "*" or [氏名] like [forms]![フォーム名]![抽出テキスト名] & "*" と記述して上手くいってます。 これをvbaで行いたいのですが、上記マクロをツールの「マクロをvisual basic に変換」した式を使用したらエラーになりました。 ちなみにマクロ変換した式は docmd.applyfilter " ", "[氏名フリガナ] like [forms]![フォーム名]![抽出テキスト名] & ""*"" or [氏名] like [forms]![フォーム名]![抽出テキスト名] & ""*""" です。 どこを訂正したら上手くいくのかご指導をお願い致します。
回答: #1です。*が抜けていました。 docmd.applyfilter , "[氏名フリガナ] like '*" & [forms]![フォーム名]![抽出テキスト名] & "*' or [氏名] like '*" & [forms]![フォーム名]![抽出テキスト名] & "*'"