Is there an easier way to write the below code?

Worksheets(1).Range("C3").Select
ActiveSheet.Paste

I tried to do this and it failed.
Worksheets(1).Range("C3").Paste

Thanx

todd huttenstine

You don't have to select
Try this that copy the active cell

ActiveCell.Copy Worksheets(1).Range("C3")


--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl



"Todd Huttenstine" wrote in message ...
Is there an easier way to write the below code?

Worksheets(1).Range("C3").Select
ActiveSheet.Paste

I tried to do this and it failed.
Worksheets(1).Range("C3").Paste

Thanx

todd huttenstine

I meant I wanted to paste whats already copied in the cell
C3.



-----Original Message-----
You don't have to select
Try this that copy the active cell

ActiveCell.Copy Worksheets(1).Range("C3")


--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl



"Todd Huttenstine"
wrote in message news:08c501c3b849$35d87f10
...
Is there an easier way to write the below code?

Worksheets(1).Range("C3").Select
ActiveSheet.Paste

I tried to do this and it failed.
Worksheets(1).Range("C3").Paste

Thanx

todd huttenstine


.

Sub PASTEIT()
ActiveCell = [B1]
End Sub


--
Don Guillett
SalesAid Software

"Todd Huttenstine" wrote in message
...
Is there an easier way to write the below code?

Worksheets(1).Range("C3").Select
ActiveSheet.Paste

I tried to do this and it failed.
Worksheets(1).Range("C3").Paste

Thanx

todd huttenstine

Sub TestPaste()
Worksheets(1).Paste Destination:=Worksheets(1).Range("C3")
End Sub

--
Regards,
Tom Ogilvy


"Todd Huttenstine" wrote in message
...
Is there an easier way to write the below code?

Worksheets(1).Range("C3").Select
ActiveSheet.Paste

I tried to do this and it failed.
Worksheets(1).Range("C3").Paste

Thanx

todd huttenstine