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
|