objFile.GetFile(strFile).Type
とやってエクセルファイルかどうかを調べるとき、結果が、Access2003とAccess2007で異なることに注意。
Access2003
- xlsと2007以降のxlsxファイルを区別しない。
Access2007
- xlsファイルか、2007以降のxlsxファイルかを区別して返してくる。
Access2007で xlsとxlsxを区別せず判別するなら
InStr(objFile.GetFile(strFile).Type, "Excel")
Discussion