Excel VBA problems

[cursong]

When trying to run the following piece of code I get a runtime '1004' error, select method of range class failed.

I am trying to copy a selection of data from one sheet to anoher sheet and then moe the row down.

The code I have is as follows:

Range("c33:d33").Select
Selection.Copy
Sheets("examples2").Select
Range("B3:C3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Selection.Insert Shift:=xlDown


It keeps falling over at the section in bold, if anyone has any answers, much appreciated thanks. Have looked fro other solutions on other websites but doesnt seem to help.

[penfold_99]

Are you trying to copy a value form one field to another?

if so try
Sheets("examples2").Range("B3").Select = _
Sheets("WHAT EVER THIS CALLED").Range("C33").value

Sheets("examples2").Range("C3").Select = _
Sheets("WHAT EVER THIS CALLED").Range("D33").value