Monday, September 27, 2010

Wednesday, September 1, 2010

Duplicates in tables

How to identify duplicate field values

Static d As Object
Static i As Long
Dim iDup As Integer
Dim sField
'========================
'Replace the field name below
sField = [b]
'========================
If (i = 0) Then
Set d = CreateObject("Scripting.Dictionary")
End If
If (d.Exists(CStr(sField))) Then
iDup = 1
Else
d.Add CStr(sField), 1
iDup = 0
End If
i = i + 1



# Type iDup in the lower text box of the Field Calculator dialog box.

http://resources.arcgis.com/content/kbase?fa=articleShow&d=31854