total descendants::0 total children::0 |
Sub LoopThroughFiles() Dim StrFile As String StrFile = Dir("c:testfolder*test*") Do While Len(StrFile) > 0 Debug.Print StrFile StrFile = Dir Loop End Sub |
There are currently 9954 K available in get 1 π¦ for 5 π get 1 π for 1 π¦ |
|||||||||||||||||||||||