[VBA] Boolean function to return whether a 1D-array members is unique or not.

IsArrayUnique.bas

Public Function IsArrayUnique(tArr As Variant) As Boolean
    Dim out As Boolean, tOut As Double
    Dim i As Long
    
    For Each t In tArr
        If Len(t) > 0 Then
            tOut = WorksheetFunction.Match(CStr(t), tArr, 0)
            If WorksheetFunction.IsError(tOut) Then
                out = False
            Else
                out = True
            End If
        End If
    Next t
    
    IsArrayUnique = out
End Function