Richard
Are you aware that the macro you are using fires when any cell in the
entire sheet is selected? Are you saying that you make the copy, then you
delete the source of the copy, and the destination of the copy is blank?
That is as it should be. The macro below will not delete the destination if
A3 of the destination is occupied. Does that do what you want? HTH Otto
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If IsEmpty(Sheets("Parts Sent to Assembly").Range("a3").Value) Then
Worksheets("Sent to Assembly").Range("a3:c100").Copy
Worksheets("Parts Sent to Assembly").Range("a3").PasteSpecial
End If
End Sub
"Richard" wrote in message
...
Thanks so much for your help, but it still will not keep the contents on
"Parts Sent to Assembly" once "Sent to Assembly is deleted.

"Otto Moehrbach" wrote:

Richard
If you want to copy A3:C100 then take out the "EntireRow" phrase.
And if you want that range pasted to A3:C100 of the other sheet, paste it
to
A3 only. Your sub should look like this:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Worksheets("Sent to Assembly").Range("a3:c100").Copy
Worksheets("Parts Sent to Assembly").Range("a3").PasteSpecial
End Sub
HTH Otto

"Richard" wrote in message
...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

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

End Sub

Can anyone help changing this code to what I need, please!
I'm trying to somehow keep the contents of the "Parts Sent to Assembly"
after the "Sent to Assembly" contents have been deleted. After the
contents
are deleted from the "Sent to Assembly" and New data is entered only
the
New
data is copied to the "Parts Sent to Assembly. Is there a way to keep
the
contents of the "Parts Sent to Assembly" and the new data from the
"Sent
to
Assembly" be added to the next blank row. I need to keep track of all
the
"Parts Sent to Assembly" but I do not need to keep track of the "Sent
to
Assembly" once it is deleted. Thanks so much in advance!!!