Comments on: Files in a Folder (VBA)

By: Karthik

Karthik — Thu, 26 Jan 2012 11:52:01 +0000

Thanks Selva. The DOS way of doing it is the best one.

Selvakumar — Wed, 25 Jan 2012 08:37:42 +0000

There is also a DOS way of doing it.

navigate to the directory using command prompt
____> cd “c:\windows”

and issue the below command
____> DIR > filelist.txt

Selvakumar — Wed, 25 Jan 2012 08:31:18 +0000

Another way to do it (with a small basic macro)

Dim temparray(5000, 1)
Path = “C:\WINDOWS\”

MyFile = Dir$(Path, vbDirectory)

inx = 1
Do While MyFile <> “”
temparray(inx, 0) = MyFile
MyFile = Dir$
inx = inx + 1
Loop

For i = 1 To inx
tp = “A” & i
Range(tp).Value = temparray(i, 0)
Next i