エクセル2007では、filesearch が使えなくなってしまいました。2003で多用していたモノで、とても困っています。次のような使い方をしていた場合、同じ処理を最も簡単に行うためにはどうしたらいいでしょう?できれば参考URLよりも、処理文を回答頂けるとうれしいのですが。 with application.fileserach .lookin=thisworkbook.path .filename="*.xls" if .execute>0 then for i = 1 to .foundfiles.count workbooks.open filename:=.foundfiles(i) next i end if end with