How to check for duplicate rows/items in table?

[guin.anirban]

See the belog script and let me know whether this helps you.

Code:

intRowCnt = Object.Table().RowCount

Public Function Comapre_Table_Element(intRowCnt)

    If (intRowCnt = 0 Or intRowCnt = 1) Then

        blnStatus = False
        
    End If

    For intItemCntx = 0 To intRowCnt - 1
    
        strGetVal1 = Object.Table().GetCellData(intItemCntx, "Level")
    
        For intItemCnty = intItemCntx + 1 To intRowCnt - 1
    
            strGetVal2 = Object.Table().GetCellData(intItemCnty, "Level")
    
            If (StrComp(strGetVal1, strGetVal2, VbTextCompare) = 0) Then
    
                blnStatus = False
    
                Exit For
                
            Else

                blnStatus = True
                
            End If
    
        Next
    
        If (blnStatus = False) Then
    
            Exit For
            
        End If
    
    Next

    Comapre_Table_Element = blnStatus

End Function