So the following bit of code seems to really bog down my system and take a loooong time to run... I'm wondering if there's a more effective way to go about this?
Essentially I need it to go through a set of records (typically 6k - 10k rows) and if it meets a couple criteria, delete that row.
My code:
Any and all help is greatly appreciated!
Essentially I need it to go through a set of records (typically 6k - 10k rows) and if it meets a couple criteria, delete that row.
My code:
Code:
For x = LastRow To 2 Step -1
If ActiveSheet.Cells(x, 6).Value < 5000 Or _
ActiveSheet.Cells(x, 3) = "A" Or _
ActiveSheet.Cells(x, 3) = "B" Or _
ActiveSheet.Cells(x, 3) = "C" Or _
ActiveSheet.Cells(x, 3) = "D" Or _
ActiveSheet.Cells(x, 3) = "E" Then
Rows(x).Delete
End If
Next x
Any and all help is greatly appreciated!