Macro delete rows based on cell value

[ste33uka]

hi would anyone have a macro that would delete row if columns N and O has a zero.
So n12 and o12 both has zero, row would be deleted.
Thanks

 

[ste33uka]

Found macro, sovled

Sub Delete_Row()
 Dim LR As Long, i As Long
LR = Range("A" & Rows.Count).End(xlUp).Row
For i = LR To 1 Step -1
   If (Range("N" & i) = "0" And Range("O" & i) = "0") Then Rows(i).Delete
Next i

Application.ScreenUpdating = True
End Sub

 

[mohadin]

Try

Sub Delete_Row()
 Dim LR As Long, i As Long
LR = Range("A" & Rows.Count).End(xlUp).Row
For i = LR To 1 Step -1
   If (Range("N" & i) = 0 And Range("O" & i) = 0Then Rows(i).Delete
Next i

Application.ScreenUpdating = True
End Sub