あり?ダメでした? うーん、何故だろう。。。 xlAndというのはNotesで定数定義していますか? あくまでもExcelの定数であって、そういう文字列でも 変数でもありません。 Notesで、xlAndを定義しなかった場合、xlAndという 変数を自動的にNotesが作ってくれますが、Variantで 値はヌルか0だと思います。 # AutoFilterメソッドがヌルだか0だかを受け取っても # 処理できなかった、という可能性がある xlAnd = 1 の事ですので、1の値をxlAndに直接置き換えてやってみたら どうでしょう? つまり、 ----------------------------------------------------- Set Selection = xlsSheet.Range("A1:D"+i) Selection.AutoFilter '表をオートフィルタにかける Call Selection.AutoFilter(2,"<>anzen/*",1,"<>mail/*") ----------------------------------------------------- でやってみてください。 # 手元にNotesがあれば自分で試してみるんだけど。。(汗) > 基本知識があまりありません。それでやってみようという方が甘いの > かもしれませんね。(^^;;; いや、最初から基礎知識のある人なんて居ないと思います。 まず試してみて、その成否にかかわらず経験値が貯まっていくもの なんですから。まず試してみる、というのは大事だと私は思います。