Be Excellent To Each Other

Right, I am not particularly good with this stuff.

I am trying to get all the files in a folder into a list in excel, as I am lazy.

I have an array which reads all the files in, and I can output all the files out, the one thing I can't seem to do, is output to a list. Ie, I can't move my activecell to the next in a range, I just overwrite the top cell in the list.

What I thought I could do is:



but this doesn't work, I realise I must be missing something fundamental about ranges and cells and selections or something, but any help would be appreciated, Thanks.

Instead of your:

Set outputRange = Range(Cells(counter, 1), Cells(arraySize, 1))
ActiveCell.Value = fileName1
ActiveCell = outputRange.Next

just do:

Cells(counter,1).value = filename1

That is if you're trying to do what I think you're trying to do. If you're doing the output one cell at a time, there's no point bothering with a range.

That worked nicely!

Okay, why didn't mine work?
[/cheeky]

Because you were re-initialising the range every time you went through the loop.

You could have also tried moving the range initialisation outside the loop:

Set outputRange = Range(Cells(1, 1), Cells(arraySize, 1))
While (counter < arraySize)

fileName1 = listArray(counter)
ActiveCell.Value = fileName1
ActiveCell = outputRange.Next
counter = counter + 1

Wend

Which would probably have worked, although using a range is pretty much unnecessary in this instance.

Of course*! Okay, brilliant, thanks.

*we need a D'oh Dimlie.