DIR Function

Topic

New Reply

Using strFilename = Dir(“” & oPath & “6*.xls”, vbHidden) one can recurse through a directory looking for files that begin with a 6.

Is it possible to recurse through the directory and look for files that do not begin with a 4,5 or 6?

Thanks,
John

Reply | Quote

Replies

You can’t specify that in the Dir instruction itself. You should specify *.xls and test the filename within the loop:

Code:

Select Case UCase(Left(strFilename, 1))
  Case "4", "5", "6"
	' Skip
  Case Else
	' Code to process the file
	...
End Select

Reply | Quote

Hans,

I was leaning towards your suggestion but I thought I would ask.

Regards,
John

Reply | Quote