Is there an easier or more logical way to write this code?

Sheets("Form Data").Range("C3").Copy
Sheets("New Deal Data").Range("AA5").PasteSpecial
Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False