Keep sheet from deleting contents

[Richard]

Worksheets("Sent to Assembly").Range("a3:c100").EntireRow.Copy
Destination:=Worksheets("Parts Sent to Assembly").Range("a3:c100")

Is there a way to keep the contents on the "Parts Sent to Assembly" sheet
once the "Sent to Assembly" sheet contents are deleted. Thanks in advance.

 

[Jim Cone]

Maybe...
With Worksheets("Parts Sent to Assembly").Range("a3:c100")
.Value = .Value
End With
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware
(Excel Add-ins / Excel Programming)


"Richard"
wrote in message
Worksheets("Sent to Assembly").Range("a3:c100").EntireRow.Copy
Destination:=Worksheets("Parts Sent to Assembly").Range("a3:c100")

Is there a way to keep the contents on the "Parts Sent to Assembly" sheet
once the "Sent to Assembly" sheet contents are deleted. Thanks in advance.