View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Otto Moehrbach[_2_] Otto Moehrbach[_2_] is offline
external usenet poster
 
Posts: 1,071
Default Very difficult, please help with copy

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!!!