View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
[email protected] nondisclosure007@hotmail.com is offline
external usenet poster
 
Posts: 7
Default appending records

Here is my question:

I've got the code to do the following:

Sheets("Sheet1").Select
Range("A2:D100").Select
Selection.Copy
Sheets("Sheet2").Select
ActiveSheet.Paste

Pretty straight forward. It copies data from Sheet1 to Sheet2.

But when it's time to copy new data, I need to append it to the end of
sheet2, not put it in the active cell.

1. How would one go about doing that?
2. Also, how could I check for duplicates BEFORE copying to sheet2.
Basing a duplication as only havve duplicate entries for columns B and
C. Regardless of what's in Columns A and D.

Probably should use Worksheet("sheetnumber").Activate instead of
Sheets("sheetnumber").Select.

Thanks.
-Michael