Solved: paste to offset cell not working

[CatDaddy]

trying to paste alternating rows from two different sheets to a new sheet called SheetName:

[VBA]
For i = 5 To 22

copyRow = i & ":" & i

Sheets("Tempe").Select
Rows(copyRow).Select
Application.CutCopyMode = False
Selection.Copy

Sheets(SheetName).Activate

With ActiveSheet
ActiveCell.Offset(1, 0).Select
Selection.Paste
End With

copyRow = (i + 3) & ":" & (i + 3)

Sheets("Atlanta").Select
Rows(copyRow).Select
Application.CutCopyMode = False
Selection.Copy

Sheets(SheetName).Activate
With ActiveSheet
ActiveCell.Offset(1, 0).Select
Selection.Paste
End With

Next i
[/VBA]

getting object doesnt support method on the selection.paste line :/

[CatDaddy]

does not need "With ActiveSheet", just:

[VBA]
ActiveCell.Offset(1,0).Select
ActiveSheet.Paste
[/VBA]