Count Number of Lines in a .txt file

Hello,

Right now I have a macro that points to a .txt file and begins importing the data into an .xls file. As it imports the .txt file, it counts the records.

The point of this part of the macro is to determine if the .txt file will exceed the row limit of about 65,000 of excel. So whenever the count > 65,000, the macro adds a new worksheet. This part of the macro is a loop and has to import and count every row. Obviously, this takes a good long time.

I noticed in the .txt file, in the status bar, is data that has already counted the rows/lines.

My want:

Is there any way I can have the macro -

1. Point to the .txt file (no problem here)
2. Then, extract or pull that row/line count number
3. Test that number if it over x amount of lines
4. And then end with IF over X amount, then...
5. Or, IF under X amount, then...

Any tips would be great! Thanks!!!

Thank you for the suggestions. I will try it out and let you know!

Hello macro_noob,

If you are interested, here is another macro to count the lines of text file. This method uses the File System Object (FSO).

Please Login or Register  to view this content.

Sincerely,
Leith Ross

Originally Posted by macro_noob

Hello,

My want:

Is there any way I can have the macro -

1. Point to the .txt file (no problem here)
2. Then, extract or pull that row/line count number
3. Test that number if it over x amount of lines
4. And then end with IF over X amount, then...
5. Or, IF under X amount, then...

Any tips would be great! Thanks!!!

try

Please Login or Register  to view this content.