Dim somevalue As Integer
Dim ThrowAway As Variant
Dim Z As Long ' loop counter

somevalue = InputBox("What line of data to start with?", "Skip Data", 0)
If somevalue 0 Then
For Z = 1 To somevalue
Input #1, ThrowAway
Next
End If

Hope this gives you some assistance.

"Jeff" wrote:

Hi,

I am using logic to read from a text file into an array

Logic: where input#1 is my text file
For y = 0 To 360
For z = 1 To 13
Input #1, MyRates(x, y)
Next z
Next y

Question = is it possible to specify a place to start saving the data into
MyRates(x,y), so could I start recording into the array at line 1000 of the
text file, if I choose? How is this done?

Thanks for your help