File List Creation

  • Thread starter Thread starter robert
  • Start date Start date
R

robert

Hello,

I'm trying to find a way to create a file list.
Right now I go to "dos" and do a dir *.txt >list.txt
and then strip out by hand what I dont' need bytes dates etc.

Is there a way to do this in excel using vb

thanks
rob
 
Yes, but I might use DOS anyway. Use DIRs /b (bare) switch.

Try DIR *.txt > list.txt /b or DIR *.txt > list.txt /b/s if you want to list
the full path and/or search subdirectories.
 
Rob

Try this

Sub ListFiles()

Dim FName As String
Dim i As Long

i = 1
FName = Dir("c:\Dick\*.txt")

Do While Len(FName) > 0
ActiveSheet.Cells(i, 1).Value = FName
FName = Dir
i = i + 1
Loop

End Sub
 
Back
Top