Range syntax with variables
 

Can someone help me with the syntax for the following:

Dim Row As Integer
Dim Col As Integer

Range("A1:O45").Select
Selection.Copy

Row = 1

For x = 1 to 52
Row = Row + 48
Col = Row + 44
Range("A"Row:"O"Col).select
ActiveSheet.Paste
Next x

I need the syntax for the Range statement. I want to select the range
of rows for

A49 through O93
A97 through O141
A145 through O189
..
..
etc

Range syntax with variables
 

and you really don't need to use selects, either

Range("A" & Row & ":O" & Col).Select



Gary


wrote in message
oups.com...
Can someone help me with the syntax for the following:

Dim Row As Integer
Dim Col As Integer

Range("A1:O45").Select
Selection.Copy

Row = 1

For x = 1 to 52
Row = Row + 48
Col = Row + 44
Range("A"Row:"O"Col).select
ActiveSheet.Paste
Next x

I need the syntax for the Range statement. I want to select the range
of rows for

A49 through O93
A97 through O141
A145 through O189
.
.
etc