I currently have Sheet2 active in this example:

Sub TestIt()
Dim Line as Integer

Line = 8
x = 1

While Cells(x,1) < ""
Sheets("Sheet1").Range("A" & Line & ":K" & Line).Select
x = x + 1
Wend
End Sub

I get an error on the Select statement "Select Method of Range Class
Failed".

I am trying to select Range("ALine:KLine") where Line is the variable.

Any help would be great.

DG