Hi all,
Can anyone be able to find alternative for the code below, this takes lot of time to execute. Thanks!
For i = ws2.UsedRange.Rows.Count To 2 Step (-1) If ws2.Range("I" & i).Value = ws2.Range("I" & i - 1).Value Then ws2.Range("I" & i).EntireRow.Delete End If Next
crossposted here
http://www.mrexcel.com/forum/excel-q...ml#post4078629