Did you copy anything; ....try the below


Range("A1:A10").Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False

--
Jacob (MVP - Excel)


"Wes_A" wrote:

Sorry forgot to enter code:
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False


"Wes_A" wrote:

Excel 2007.
Bog standard code, below produces "Real Time Error '1004'
PasteSpecial method of Range class failed."
Any ideas on what could cause this ?