Highlighting duplicates

147man

New Member
Joined
Sep 19, 2002
Messages
1
Hi,
Can anyone help me with some VBA to highlight duplicates within a column. If a cell has a duplicate then I would like it and all its brothers to be highlighted. I have achieved this using a for.. next loop but as I have thousands of records it is inelegant (and slow) I would like to use the FIND method.

Many thanks
 

Excel Facts

Excel motto
Not everything I do at work revolves around Excel. Only the fun parts.

Joe Was

MrExcel MVP
Joined
Feb 19, 2002
Messages
7,539
This will filter your data. JSW

Sub DoIt()
Range("A1", Range("A65536").End(xlUp)).AdvancedFilter _
Action:=xlFilterInPlace, Unique:=True

Range("A1", Range("B65536").End(xlUp)).SpecialCells _
(xlCellTypeVisible).Copy Destination:=Sheets("Sheet1").Range("A1")

ActiveSheet.ShowAllData
End Sub
 

IsThereAWayOf

New Member
Joined
Sep 19, 2002
Messages
5
Another way is by using Conditional Formatting if you want to just do a few columns.

select formula is and then type
=COUNTIF(G:G,G11)>1

and then however you want to highlight the dupes.
 

Forum statistics

Threads
1,143,615
Messages
5,719,728
Members
422,242
Latest member
hishamkhatri

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top