PDA

View Full Version : VBA code to look for files and put result in an array



desonny
01-03-2012, 03:38 AM
Hi folks,

Does anyone know the code to let excel 2003 look for files , like "test*.xls", in a specific directory and put the result in an aray.
Or even better to put only the *-strings in an array ?

Thanks in advance !

Bob Phillips
01-03-2012, 04:48 AM
Dim mFile As String
Dim vecFiles As Variant
Dim idxFiles As Long

ReDim vecFiles(1 To 1)
mFile = Dir("C:\temp\trash*.xls", vbNormal)
Do While mFile <> ""

idxFiles = idxFiles + 1
ReDim Preserve vecFiles(1 To idxFiles)
vecFiles(idxFiles) = mFile
mFile = Dir
Loop