Sheets("Form Data").Range("C3").Copy _
Sheets("New Deal Data").Range("AA5")

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Kurt Barr" wrote in message
...
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