Edgar-

From your other posts, I gather it's this line that errors:

.Range(cRanges).Value= AllTrim(X12.Schddate)

I ran a test using VFP 7.0 with an Excel 2000 spreadsheet on a W2K Server box, and didn't get an error.

LOCAL lo as excel.application
lo = CREATEOBJECT('excel.application')
lo.Workbooks.Open(GETFILE('xls'))
?lo.Workbooks(1).Sheets(1).Rows.Count
FOR lni = 1 TO lo.Workbooks(1).Sheets(1).Rows.Count
	WAIT STR(lni) WINDOW NOWAIT NOCLEAR
	lo.Range("A" + LTRIM(STR(lni,5))).Value = lni
NEXT lni
lo.Workbooks(1).Close
lo.Quit
RELEASE lo

I could only bear to let it run for 25K rows. There's nothing obvious. Have you looked at the spread and at that cell in particular? When we were testing an import of really large spreadsheets, one of our testers had errors, but I don't have access to the bug reports, and don't recall the details. IIRC it had something to do with version she was using to test...of the OS or Excel.

Have you checked the value of ".Range(cRanges)"? Does it return an object?