I know you are happy with the answers you have already received, but
here is a very short and elegant solution that does work reliably.

Always look up the on line Help in the VB Editor, there is a lot of
good stuff there.
It pays to put your cursor in the key word, (ie Copy in this case)
and hit the F1 key - this will display its on line Help. This
example is shown in the on line Help for 'Copy' being used with
the 'Range' object.

Private Sub cmdPasteFees_Click()

ActiveSheet.Range("A52:E92").Copy _
Destination:=Worksheets("Rates").Range("A1")

End Sub