Grace

Whislst I sit back and think up a way of increasing the speed add this
single line of code (in red) at the start of the macro

Dim lRow As Long
Application.ScreenUpdating = False


Add this line of code (in red) at the end before

Application.ScreenUpdating = True
End Sub


One idea i have to speed up the process is to tag a helper column with
all rows that need to be deleted then sort on the helper column so all
rows that need deleting are together and can then be deleted at the
same time


---
Message posted from http://www.ExcelForum.com/