Code won't stop looping through imported spreadsheet

[Mike72688]

Thank you for your reply. I changed the code to this:

Code:

DataTable.Import "C:\Temp\CreateVendor2.xls"
r = DataTable.GetRowCount
Do While r >= 1

' lines of code

DataTable.SetNextRow
r = r-1
Loop

It seems to do the same thing. After the final row of data (row 3) it goes all the way to the first line of code (importing the spreadsheet) and starts over. Am I supposed to be putting this in a subroutine? I am unclear on what the code should look like. Thank you in advance for your help.

Mike