I'm trying to loop through all the *.?XT files in the given folder
e.g. xyzcompany.#XT abccomopany.TXT etc..
My code is stuck in some sort of loop that crashes excel. I think it comes from using the Dir() statement. See what you can glean:
MyFile = Dir(CurDir() & "\*.?XT")
Do While MyFile <> ""
Open MyFile For Input As #1
For i = 1 To 3
Line Input #1, txt
Next
... code that parses the file and gets some information ...
Close
MyFile = Dir() 'next file in the directory
Loop
so i can see that it's getting the information because it outputs the information to my spreasheet but after it gets all the info it goes into an infinite loop
thoughts?
G
Bookmarks