Greetings ! and a Happy New Year !

This works OK:-
For J = 1 To .FoundFiles.Count Step 1
myText = .FoundFiles(J)
....

returning the long file name of each file in turn
But how can I get the SHORT filename of each in turn ?

myText = .FoundFiles(J).ShortName

doesn't work.


Regards

Robin