Use below code.
Sub DupFinder()
Dim r As Range, t As Range
Cells(1, ActiveCell.Column).Select
Range(Selection, Selection.End(xlDown)).Select
Set t = Selection
For Each r In t
v = r.Value
If Application.WorksheetFunction.CountIf(t, v) > 1 Then
r.Interior.ColorIndex = 3
End If
Next
End Sub
Select first cell of the column where you have your data and run the macro. All
the duplicates will turn red.
_________________________________________________________________________________________________
"There are known knowns. These are things we know that we know. There are known
unknowns. That is to say, there are things that we know we don't know. But
there are also unknown unknowns. There are things we don't know we don't know."
________________________________
From: vinod kumar kumar <[EMAIL PROTECTED]>
To: excel-macros@googlegroups.com
Sent: Friday, 31 October, 2008 5:50:41 PM
Subject: $$Excel-Macros$$ How to findout Duplicate items
Hello All,
Could you pls help me out in the below issue.
I have 50 amounts in a single column, those are repeated amounts.
I would like to know which are all repeated amounts by highlighting or
something like that.
Thanks
--
Vinu
(¨`*.*´¨) Always
`*.¸(¨`*.*´¨) Keep
(¨`*.*´¨)¸.*´ Smiling!
`*.¸.*´
Add more friends to your messenger and enjoy! Go to
http://messenger.yahoo.com/invite/
--~--~---------~--~----~------------~-------~--~----~
Visit the blog to download Excel tutorials at
http://www.excel-macros.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/excel-macros?hl=en
Visit & Join Our Orkut Community at
http://www.orkut.com/Community.aspx?cmm=22913620
Visit the blog to download Excel tutorials at
http://www.excel-macros.blogspot.com
To Learn VBA Macros Please visit http://www.vbamacros.blogspot.com
To see the Daily Excel Tips, Go to:
http://exceldailytip.blogspot.com
-~----------~----~----~----~------~----~------~--~---
