Can't get Dir to work!!
I've got the following code but y always results in an empty string!!
ChosenFolder is the folder the have selected. There are files in the folder.
If chosenFolder <> "" Then
y = Dir(chosenFolder & "*.*")
Do Until y = ""
Debug.Print y
y = Dir
Loop
Thank you.