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