• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Duplicate Data Identify

Abhijeet

Active Member
Hi

I want to identify duplicate data with multiple criteria please give me macro
 

Attachments

  • Duplicate Data.xlsx
    9.8 KB · Views: 11

Hi,

please give a complete and clear explanation ‼ Without that, nobody can understand your needs …
A attached workbook with original sheet and another as result sheet is better to understand too.

Answer quality is proportional to the demand …​
 
I want result I put in this file which is duplicate & which is not Duplicate as per this please give me macro
 

Attachments

  • Duplicate Data.xlsx
    13.3 KB · Views: 4

Is that a complete and clear explanation ?‼ No logic in your worksheet ‼

Please give a complete explanation, what's the criterias ? How to, how you did it ?

No logic, no code … As poor explanation, poor code …​
 
Row 1 Data same in Row 25 then that is duplicate I put formula column O that is =A1&"-"&D1&"-"&F1&"-"&G1&"-"&H1&"-"&I1&"-"&J1&"-"&K1&"-"&L1&"-"&M1&"-"&N1
For Identify Duplicate or not I use this =IF(COUNTIF(O:O,O1)>1,"Duplicate","Not duplicate") formula
My request to you please look in Column O & P formula then u understand my problem
 

As you did it with formulas, do you really need code ?
What's the purpose now 'cause the job is already done ?

Easy with the Macro recorder …​
 
Last edited:
Code:
Sub Macro1()
'
' Macro1 Macro
' Macro Recorder in action !
'

'
     Range("O1").Select
    ActiveCell.FormulaR1C1 = _
        "=RC[-14]&""-""&RC[-11]&""-""&RC[-9]&""-""&RC[-8]&""-""&RC[-7]&""-""&RC[-6]&""-""&RC[-5]&""-""&RC[-4]&""-""&RC[-3]&""-""&RC[-2]&""-""&RC[-1]"
    Range("P1").Select
    ActiveCell.FormulaR1C1 = _
        "=IF(COUNTIF(C[-1],RC[-1])>1,""Duplicate"",""Not duplicate"")"
    Range("O1:P1").Select
    Selection.AutoFill Destination:=Range("O1:P28"), Type:=xlFillDefault
    Range("R1").Select
End Sub
 

Of course it's a Macro recorder's code !
And in your "explanation" you don't asked for a dynamic range despite my 3 requests ‼

It's only to show you what many times we asked you in each of your posts :​
  • a workbook with original sheet data and another result sheet
  • a base code (even from Macro Recorder)
  • a complete and clear explanation of your needs …
If you start with that, you have your need in the next message instead to claim you details
and wasting our time !

Now anyone can answer to your demand, I have no time anymore,
I'll see maybe tomorrow if there is any answer …
 
Marc L I tell u data is huge in my previous post can any other person can give me macro Range I want dynamic
 
Hi,
I had seen a very good video on YouTube for Identifying duplicate...Not sure..if it is helpful for you.

 
Please give me macro or Add in for this or separate macro. I want run macro then choose option for select file then identify duplicate data
 
I'm so hurried these days that I just could advise that you already had the dynamic range
in some of your own past threads ! See the End(xlUp) property for example …​
 
@Abhijeet
Hi!
People who are regular contributors, and very good ones like Marc L in this case, are always facing issues because of your difficulty to express in plain text, in black over white, in a friendly, clearly and descriptive way, which is your main issue or what you're trying to achieve.
You'd be either supposing the we're all magicians or have telekinetic or paranormal abilities, well, I might bring you back to earth: we're just normal persons that try to understand what other normal persons try to mean. We intend to behave as normal persons and we expect that others do the same thing.
Help us help you, being clear and pristine with your requirements; otherwise you'd only get frustration for not being comprehended and answered satisfactorily, or furthermore just silence because of people tired of dealing once and twice and endlessly with the trisyllabic "give macro man".
Regards!

@Marc L
Hi!
Bible's Job patience raised to the googol it's a sine qua non pre-requisite. Consider yourself advised...
Regards!
 
Last edited:
Back
Top