Deleting entire duplicate rows

[Ionisation]

I have a document with over 1000 rows of data. Amongst this data are duplicate rows scattered between.

Can i find and delete these duplicate rows with one or two click?

Duvall

 

[stuartford]

you could sort the data by the column containing the duplicate rows then run a vba If statment

Sub tst()



For n = 1 To 1000
If Cells(n, 1) = "" Then
End
Else
End If
If Cells(n, 1) = Cells(n + 1, 1) Then
Cells(n + 1, 1).EntireRow.Delete
n = n - 1

Else

End If

Next n
End Sub



Hope this is of some help

Stu

 

[mikewg]

What if you don't know for sure that there's 1000 rows of data? For example, some days there's 500 and some days there's 1500? I know there's always less than 5000, so I run a macro deleting rows from 1-5000, but the macro takes a long time to complete knowing that most of the rows it checks are completely blank. I could speed up the macro if it just looked at the rows that contained data - however, I'm not sure that any particular column will contain data (for example, Col A could be blank and Col B have data for one row, but in another it's switched). Thoughts?