Using VBA to delete rows based off of various criteria

[RBVakarian]

Hello all, i need some VBA for a large file. I need to delete all the rows that meet any one of these requirements:
Column E = "Z"
Column AD > 0
Column AJ > 0

Thanks for helping!

 

[RBVakarian]

This is what i have so far

Sub Scrubadub() Application.ScreenUpdating = False
Dim LastRow As Long
Dim rng As Range
LastRow = ActiveSheet.UsedRange.Rows.Count
For Lrow = LastRow To Firstrow Step -1
If Cells(Lrow, "AJ").value < 0 Or Cells(Lrow, "AD").value < 0 Or Cells(Lrow, "e").value = "z" Then
'mark for deletion
End If
Next
'delete
Application.ScreenUpdating = True




End Sub

 

[RBVakarian]

bump