Modify COUNTIF to make it case sensitive

i am looping through fields A and C to get duplicates:

'concatenate the fields for which duplicate is to be checked
For i = 2 To lastrownum
data_sheet.Cells(4, 1) = data_sheet.Cells(1, field1) & data_sheet.Cells(3, field2)
Next i

'list the duplicates
For j = 2 To lastrownum
If WorksheetFunction.CountIf(Range("D2:D" & lastrownum), Range("D" & j)) > 1 Then
data_sheet.Cells(5, 2) = "Duplicate"
End If
Next j

But i want to make it case sensitive. pls help

yah but this is using an excel formula COUNTIF which is making it case insensitive. I want to make it case sensitive

thanks. can you pls explain how it works? also, it is listing blank rows as well for duplicates which i would to ignore.

Originally Posted by mikerickson

This test is case sensitive

Please Login or Register  to view this content.

as for blank cells add this to your if condition:

Please Login or Register  to view this content.