VBA - Looking for duplicate in filtered range

**Enzinaldo** · 03-10-2021, 08:13 AM

I want to filter my DB by the values in the first column 1 and find duplicates checking the value in column 83 (values in columns 83 for visible cells must be different).

What I am doing wrong with my code?

Set sh = ActiveSheet
RowCount = 0
For Each rw In sh.Rows
Value = sh.AutoFilter.Range.Offset(1).SpecialCells(xlCellTypeVisible).Cells(1, 1).Value
sh.Range("$A$1:$DA$1156").AutoFilter Field:=1, Criteria1:= _
Value
MsgBox (Value)

    For Each ele In Range("$A$1:$DA$1156").SpecialCells(xlCellTypeVisible)

        Version = ele.SpecialCells(xlCellTypeVisible).Cells(1, 83).Value
        For i = 2 To 30    ' Revise the 30 to include all of your values
            If sh.Range("A:ZZ").SpecialCells(xlCellTypeVisible).Cells(i, 83).Value = Version Then
              MsgBox ("Found value on row " & i)
        
            End If
        Next i
    Next ele
Next rw

End Sub

**Richard Buttrey** · 03-10-2021, 08:43 AM

Hi and welcome to the forum

Difficult to tell without knowing what you expect and what the macro does.
Please upload a workbook or a representative cut down copy, anonymised if necessary. It is always easier to advise if we can see your request in its context.

Show a before and after situation with manually calculated results, explaining which information is data and which is results, and if it's not blindingly obvious how you have arrived at your results some explanatory notes as well.

To upload a file click the Go Advanced button at the foot of your post, look underneath the post area for the Manage Attachments section and take it from there.

There are better ways to identify duplicates without looping, probably using a single helper column.

**Enzinaldo** · 03-10-2021, 11:58 AM

This is a template of my excel sheet:

gLixj.png

I am trying to find out the rows with the same "IDM" and same "Version".

My solution is quite complex to solve the task because I would like to filter the rows by the "IDM" (in the first column), afterward looping through the visible rows to find rows with the same "Version".

I hope to have been more clear.

VBA - Looking for duplicate in filtered range

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

VBA - Looking for duplicate in filtered range

Re: VBA - Looking for duplicate in filtered range

Re: VBA - Looking for duplicate in filtered range

Thread Information

Users Browsing this Thread

Similar Threads

Flash each Uniqe Values from Filtered Duplicate

Copy filtered data into filtered range in a separate sheet

results of filtered range to hide/unhide rows in same wrksheet, outside the filtered range

Countif without duplicate in filtered cells

[SOLVED] Excel VBA - Issue in Naming Filtered Range on a Filtered List.

Hide duplicate rows from filtered data

Pivot Table - Duplicate Columns Filtered Differently?

Tags for this Thread

Bookmarks

Bookmarks

Posting Permissions