Remove Duplicates from Excel Table

[rumshar]

Hi All,
Can you please help me with VBA code to remove duplicates for an excel table. I don't wan't to refer table by its name. Currently I am using following code which is not working.

ActiveSheet.ListObjects(1).RemoveDuplicates Columns:=1, Header:=xlYes

 

[NARAYANK991]

Hi ,

Since the RemoveDuplicates method is applicable to a Range , you may need to use this :

ActiveSheet.ListObjects(1).DataBodyRange.RemoveDuplicates Columns:=1, Header:=xlYes

Narayan

 

[Hui]

I'd be using something like:

  ActiveSheet.Range("$A$1:$H$100").RemoveDuplicates Columns:=1, Header:=xlYes

 

[rumshar]

Hi ,

Since the RemoveDuplicates method is applicable to a Range , you may need to use this :

ActiveSheet.ListObjects(1).DataBodyRange.RemoveDuplicates Columns:=1, Header:=xlYes

Narayan

Thanks Narayan. I didn't think that way earlier. Thanks once again.

 

[rumshar]

I'd be using something like:

  ActiveSheet.Range("$A$1:$H$100").RemoveDuplicates Columns:=1, Header:=xlYes

Thanks Hui,
But I feel the code you have given suits well for normal excel range and not for excel tables. Anyways I got the solution from Narayan. Thanks for taking your time and trying to help me out. You guys are awesome.