>>O001 オブジェクト変数が設定されていません。 「設定されていない」って言うくらいだから、 >>やはり何か宣言しないといけないのでしょうか? って事でしょうね。(^_^;) わからないけど、でもいきなり Selection.AutoFilter.Field=2 は違うと思います。 Set XXXXX = Selection.AutoFilter XXXX.Field = 2 って感じではないのかな? (ゴメンナサイ全然ダメです)