[RESOLVED] Delete All but One Duplicate Row in Worksheet

[westconn1]

try

For i = 1 To Worksheets("Overview").UsedRange.Rows.Count
          For j = Worksheets("Overview").UsedRange.Rows.Count To i + 1 Step -1
              If Worksheets("Overview").Cells(i, 1) = Worksheets("Overview").Cells(j, 1) Then Worksheets("Overview").Rows(j).Delete
          Next j
      Next i