The simpliest way is to check the legth of the filename

MyPath = ThisWorkbook.Path & "\"
FilesInPath = Dir(MyPath & "*.ORG.2008BP.xls")
if len(FileInPath) = 22 then

else


end if

"JASelep" wrote:

in Excel 2003
I'm using ...

MyPath = ThisWorkbook.Path & "\"
FilesInPath = Dir(MyPath & "*.ORG.2008BP.xls")

to select files for processing

how would I distinguish between files that are named

#= single numeric character

##.####.ORG.2008BP.xls

and

##.ORG.2008BP.xls

"##.####.ORG.2008BP.xls" didn't work
--
Jim