Hi Bob
I use the code you paste i a question i have before
"Filesystem again"
It is a Getfolder function
with this lines in last of the function
GetFolder = ""
If SHGetPathFromIDList(ByVal oDialog, ByVal path) Then
GetFolder = Left(path, InStr(path, Chr$(0)) - 1)
End If

Now i want to use this path in a
For
And
Next
So i have to have the value from getfolder into a variable
How do i do that?

Best regards Alvin