Access VBA質問箱 IV

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

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


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

696 / 9994

←次へ　｜　前へ→


	【12608】Re:片方の条件でのApplyFilterの使い方

hatena - 14/9/4(木) 16:22 -


	引用なし

	パスワード

>個々にボタンを持ち、顧客番号のみや顧客名のみでは下記の式でとれるのですが、一つのボタンで処理をしたいのですがうまくいきません。 > >（顧客番号のみ）DoCmd.ApplyFilter "", "[Q顧客名]![顧客番号] like [forms]![F顧客一覧]![顧客番号入力]" > >（顧客名のみ）DoCmd.ApplyFilter "", "[Q顧客名]![顧客名] like '*" & [Forms]![F顧客一覧]![顧客名入力] & "*' " Ifで場合分けすればいいのでは。 If Forms!F顧客一覧!顧客番号入力 <> Then 　　DoCmd.ApplyFilter "", "[Q顧客名]![顧客番号] = [Forms]![F顧客一覧]![顧客番号入力]" ElseIf Forms!F顧客一覧!顧客名入力 <> "" Then 　　DoCmd.ApplyFilter "", "[Q顧客名]![顧客名] like '*" & [Forms]![F顧客一覧]![顧客名入力] & "*'" End If