Copy unique values and paste to another sheet

I need help for a VBA code to remove duplicate from one sheet to another sheet.

My 1st sheet contains the “raw” data starting from row “A8:B65000” (2 column). The sheet name is “Data”

On the 2nd sheet, the unique data will be copied starting at row “A12:B” (up to the last row) The sheet name is “Unique”.

How it works:
Data sheet – On this sheet the data is keyed every day.
Unique sheet – When I click on this sheet, only the unique data from the DATA sheet will be copied into this sheet, meaning all the data from DATA sheet minus the duplicate)

Thank you all.

Do you need to check for duplicates in column A with column A, column B with column B, or both?

Thanks for your prompt response.

I need to check BOTH (2 columns)

I'm still not clear on which columns to compare to but try this:

Sub TryThis()
Dim ws1 As Worksheet:   Set ws1 = Sheets("Data")
Dim ws2 As Worksheet:   Set ws2 = Sheets("Unique")
Dim icell As Range, valCheck As Range

Application.ScreenUpdating = False

For Each icell In ws1.Range("A8:A" & ws1.Range("A" & Rows.Count).End(xlUp).Row).SpecialCells(xlCellTypeConstants)
    Set valCheck = ws2.Range("A1:B" & ws2.Range("A" & Rows.Count).End(xlUp).Row).Find(What:=icell.Value, LookIn:=xlValues, LookAt:=xlWhole)
    If valCheck Is Nothing Then
        icell.Resize(1, 2).Copy Destination:=ws2.Range("A" & Rows.Count).End(xlUp).Offset(1, 0)
    End If
Next icell

Application.ScreenUpdating = True

End Sub

Thanks for your prompt response.

It works fine but with the following revisions:
1. When you changed some data on the data sheet, it does not over write the unique sheet, maybe you can add a code to clear unique sheets every time the macro is triggered. (or any suggestion)
2. Can you add a code that when you select the unique sheet, it will run the macro automatically.
3. Also, can you add a code to sort the unique sheet.
4. I tested it at 50000 rows and it is slow, any other way to speed it up?