[Resolved] Populating an xl sheet with the contents of a folder - hmmm?

[queenb2005]

Ok I am trying to macro a process that takes all files from a folder and lists them in column A of an Excel sheet. From there I will make a second process to open them in sequence and run other processes with them, but I got that part in the bag. I'm just having trouble on where to begin. I know I have to

ChDir ("\\myserver\blah\blahblah\mydir\")

then I draw a blank. It's probably so easy it's hard. If anyone has any input I'd greatly appreciate it.

~QueenB

[Br1an_g]

are the files all of a particular extension? or mixed types?

[Br1an_g]

try this..freehand so may need some amendments

'set start point in spreadsheet
Range("A1").Select
 
'set directory - you can also set only certain file types
'hence my earlier question
CurrFile = Dir("C:\Directory\*.CSV")
'or use for no particular file type
'CurrFile = Dir("C:\Directory")
 
'repeat until all file names have been read
Do While CurrFile <> ""
 
'set value to current cell
activecell = currfile
 
'offset to next cell in column
activecell.offset(1,0).activate
 
'set to next file
CurrFile = Dir
 
Loop

[queenb2005]

Thanks Br1an_g! That did the trick.

~Queen B