Error: Script to import large .txt file into Excel 2000

Hi,

This is my first time posting here, so bear with me if i've made mistakes.

I am trying to import a large .txt file into excel (the .txt file has over 100,000 lines of data)
I can't import through the obvious method as it's over 65k lines.

I have come across the following code while searching for a solution:

Please Login or Register  to view this content.

This looks as if it will do what i need it to (import the data, when "sheet1" is full it will begin filling "sheet2" then "sheet3".etc).
However i keep getting the following error:

Run-time error '438'
Object doesn't support this property or method

The error occurs on the lines highlighted above.
EDIT: I'm having trouble highlighting the correct lines, the error occurs on the following lines:

Worksheets("Sheet" & iSh).Offset(lL, J).Value = _
Trim(Left(strLine, iLen - 1))

I have very limited knowledge of Visual Basic, but it looks as if it's because the worksheet is not being selected first...?
I've spent ages trying to get it to work and any help would be greatly appreciated.

Thanks for your time.

I'm using Windows 2000 and Excel 2000