---------------------------------------------------------------------------
Hi Gohar,
Try this code, This will Select all the duplicates in your selection
and will tell you their count too.
1. Press Alt+F11
2. Paste the code below in code window.
Sub SelectDuplicateValues()
Dim MyCell As Range
Dim rNew As Range
Dim rFind As Range
Dim iSecRange As Range
For Each MyCell In Selection.Cells
If Not IsEmpty(MyCell.Value) Then
For Each ncell In Selection.Cells
If Intersect(MyCell, ncell) Is Nothing Then
If iSecRange Is Nothing Then
Set iSecRange = ncell
Else
Set iSecRange = Union(ncell, iSecRange)
End If
End If
Next
Set rFind = iSecRange.Find(MyCell.Value, LookIn:=xlValues,
LookAt:=xlWhole, MatchCase:=True)
If Not rFind Is Nothing Then
If rNew Is Nothing Then
Set rNew = MyCell
Else
Set rNew = Union(rNew, MyCell)
End If
End If
End If
Set iSecRange = Nothing
Next
If Not rNew Is Nothing Then
rNew.Select
End If
Msgbox Selection.cells.count & " Duplicate Cells Found."
End Sub
3. Press Alt+Q.
4. Press Alt+F8.
5. Run the macro - Select Duplicate Values.
------------------------------------------------------------------------
For more tips, tricks, downloads and problem solutions: visit -->
http://www.excelitems.com
------------------------------------------------------------------------
Regards
*Ashish **Jain*
Analyst, CSC Australia
Microsoft Certified Application (Excel) Specialist
Technical Trainer - Excel and VBA
Author -> www.excelitems.com
+91-9999-40-48-43
---------------------------------------------------------------------------
---------------------------------------------------------------------------
On Mar 19, 7:47 am, tariq 78692 <[email protected]> wrote:
> repleated value find some type -
>
> conditional formating
> logical value by if condition.
>
> On 17/03/2009, Harmeet Singh <[email protected]> wrote:
>
> > See attached file.
>
> > On Tue, Mar 17, 2009 at 12:34 PM, Gohar <[email protected]> wrote:
>
> >> Dear All
> >> How to find out repleated value in a column.
>
> >> Thanks
> >> Gohar
>
> > --
> > Thanks & Regards,
>
> > Harmeet Singh
--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to [email protected]
If you find any spam message in the group, please send an email to:
Ayush Jain @ [email protected] or
Ashish Jain @ [email protected]
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---
