can someone tell me why i am out of range here??

i am extremely frustrated with this. i can not figure out why i am receiving an error 9: subscript out of range. any help is appreciated.

Dim LR As Long
    If Sheets("one").checkbox.Value = "test" Then

With Sheets("one")
    LR = .Range("A" & .Rows.Count).End(xlUp).Row
    .Range("A3:M" & LR).Copy
    Workbooks("test.xlsm").Sheets("two").Range("A" & Rows.Count).End(xlUp).Offset(1).Paste  <<<<error on this line
End With

both workbooks are open.

Workbooks("test.xlsm").Sheets("two").Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlValues

*smacks self* .... i've been staring at the screen too long =) thats again AB33