MSアクセスマクロWhere条件式に256文字制限

質問

アクセス2010　WebデータベースではVBAが使えないため、マクロでフィルターをかけるしかないのですが、Where条件式に256文字制限があります。

住所：世帯主；家族名：誕生年：誕生月：誕生日：年齢：備考

各変数の初期値は"*"

Where条件式
([住所] Like '*' & [TempVars]![mati] & '*') *
([世帯主] Like '*' & [TempVars]![setai] & '*') *
([家族名] Like '*' & [TempVars]![simei] & '*') *
([誕生年] Like '' & [TempVars]![n] & '') *
([誕生月] Like '' & [TempVars]![m] & '') *
([誕生日] Like '' & [TempVars]![d] & '') *
([年齢] Like '' & [TempVars]![y] & '') *
([備考] Like '*' & [TempVars]![bikou] & '*')

※年月日、年齢は実質 Like ではなく（等しい）になります。

mati=中野
simei=清
d=20
（住所に「中野」を含む） And （家族名に「清」を含む）　And （誕生日が20）　のデータを抽出

対象フィールドがたくさんある場合、制限文字数256以上になってしまいます。
このような場合、何か他の方法でフィルターをかけるすべはありませんか？

例えばクエリに以下のフィールドを追加
検索対象:"1" & [住所] & "1,2" & [世帯主] & "2,3" & [家族名] & "3,4" & [誕生年] & "4,5" & [誕生月] & "5,6" & [誕生日] & "6,7" & [年齢] & "7,8" & [備考] & "8"
として、ダミーの番号を元に検索できる文字列をつくるとか。

回答No.3

hatena1989 · ベストアンサー

あれからちょっと考えてみました。

テーブルからクエリを作成して、

「住所」フィールドの抽出条件を、
Like "*" & [TempVars]![mati] & "*"

[世帯主] フィールドの抽出条件を、
Like "*" & [TempVars]![setai] & "*"

・・・・以下略

と設定してこれを元にフォームを作成します。

一時変数に値を代入した後、再クエリすればどうでしょうか。

お礼

できました。
あきらめていましたが、ご教授のとうりで完璧です。

これで256文字の呪縛から解放です。

ありがとうございます。

回答No.2

hatena1989

> Webデータベースで作っているのですが、マクロにもかなり制限があるみたいで・・・

うーん、手詰まりですね。私にはもうアイデアはないので、
他の熟練者の方の回答をお待ちください。

お礼

いろいろ考えていますが・・・

無理なのかなぁ。今しばらく、回答者様をお待ちします。
ありがとうございました。

回答No.1

hatena1989

まずクエリを作成して、希望の抽出条件をそこで設定します。

ＳＱＬ例

SELECT * FROM テーブル1 WHERE 希望の条件式;

これを保存します。
マクロの「フィルターの実行」の「フィルタ名」にこのクエリ名を設定します。

以上でどうでしょうか。
今、出先で、2010がないので2003で確認してますので、2010 だと名称が異なるかもしれません。

補足

Webデータベースで作っているのですが、マクロにもかなり制限があるみたいで・・・
〇フィルターの設定
　　　Where 条件式　= ____________
　　　　コントロール名 ____________
で、「フィルター名」を設定できないようです。
一時変数にWhere文を入れて、これを条件式にしようとしましたがダメでした。
やはり無理なのでしょうか？