自分は、ファイル削除するだけならば、 If Dir("c:\B.XLS") <> "" Then SetAttr "c:\B.XLS", vbNormal Kill "c:\B.XLS" End Ifっていう感じで削除しちゃいますが、FSOを使わないといけないのかなぁ〜。