Selecting Ranges using Variables
 

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

Selecting Ranges using Variables
 

You need to have "Sheet1" active to select the range. Try this...

Sub TestIt()
Dim Line As Integer
Dim x as Integer

Line = 8
x = 1

Worksheets("Sheet1").Activate

While Worksheets("Sheet2").Cells(x, 1) < ""
Worksheets("Sheet1").Range("A8:K8").Select
x = x + 1
Wend
End Sub


"DG" wrote:

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