Hi,
Why do you need VBA to do this?
It is already there under Data > Remove Duplicates, and then Under Columns, check or uncheck the columns where you want to remove the duplicates
A sample code to remove duplicates comparing multiple columns
Sub RemoveDups_MultColumns()
ActiveSheet.UsedRange.RemoveDuplicates Columns:=Array(1, 2) , Header:=xlYes
End Sub