Access VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1594 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【6367】フィルタに関して Sta 05/9/27(火) 14:01 質問[未読]
【6368】Re:フィルタに関して クロ 05/9/27(火) 14:17 回答[未読]
【6369】Re:フィルタに関して Sta 05/9/27(火) 14:43 お礼[未読]
【6367】フィルタに関して
質問  Sta  - 05/9/27(火) 14:01 -
引用なし
パスワード
   こんにちは。
フィルタで直接値を入れると上手く行くのですが
変数で設定すると「パラメータ入力」の画面がでます。
ここに入力すると（手入力）上手く抽出します。
画面を出さないで抽出する方法を教えて下さい。

例：OKの場合
Filter = "対応結果 = ""対応済"""
FilterOn = True

例：パラメータ入力画面が出てくる場合
Dim Da As String
Da= "対応済"
Filter = "対応結果 = " & Da
FilterOn = True ←ここを通過後画面がでます


よろしくお願いします。
【6368】Re:フィルタに関して
回答  クロ  - 05/9/27(火) 14:17 -
引用なし
パスワード
   こんにちは、クロです。
直書きするときには「"」で括っているのに
変数にしたら括らないのは...なぜ？

Filter = "対応結果 = '" & Da & "'"
でどうでしょ？
【6369】Re:フィルタに関して
お礼  Sta  - 05/9/27(火) 14:43 -
引用なし
パスワード
   ▼クロ さん：
>こんにちは、クロです。
>直書きするときには「"」で括っているのに
>変数にしたら括らないのは...なぜ？
>
>Filter = "対応結果 = '" & Da & "'"
>でどうでしょ？

ご回答ありがとうございます。
ご指摘の通りです。
変更して上手く抽出できました
ありがとうございます。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1594 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078230
(SS)C-BOARD v3.8 is Free