Delete entire row based on two conditions

[Panoos64]

Hi all, i would like to use VBA code so that to delete entire row if met two criteria. Col."H" is 0 (zero) and col. "N" is blank.

Thank you all in advance

 

[alansidman]

Option Explicit


Sub Panoos()
    Dim i As Long, lr As Long
    lr = Range("A" & Rows.Count).End(xlUp).Row
    For i = lr To 1 Step -1
        If Range("H" & i) = 0 Then
            If IsNull(Range("N" & i)) Then
                Range("H" & i).EntireRow.Delete
            End If
        End If
    Next i
End Sub

 

[Panoos64]

Hi alan, it doesn't work. If Col. "H" contains number "0" and col. "N" is blank then should delete entire row. However thank you for your support. Have a great day

 

[alansidman]

What does Blank in Column N mean? Does it contain a formula? If it contains a formula then it is not blank by Excel standards. Blank is Null. No formula. No nothing. Your response of "doesn't work" doesn't help me to solve your issue. Suggest you upload your file (sample) to a third party web site for analysis as without seeing what "Blank" means I can offer no further help. My Code works for me.

 

[GirishDhruva]

If i have understood your problem
Try with this code

Option Explicit


Sub Panoos()
    Dim last As Long, i As Integer
    Application.ScreenUpdating = False
    last = Cells(Rows.Count, "H").End(xlUp).Row
    For i = last To 2 Step -1
        If (Cells(i, "H").Value = 0) And (Cells(i, "N") = "") Then
            Rows(i).Delete
        End If
   Next i
    Application.ScreenUpdating = True
End Sub

Regards
Dhruv

 

[Panoos64]

Thank you Girish, it works perfect and nicely. Thank you once again for your time spent for my project. Have a lovely day!

 

[GirishDhruva]

I'm glad to help you.Thanks for the feedback

 

[Panoos64]

Hi alan, i do know the reason that it doesn't work. No formula exists in "N" in blank cells and col. "H" contains the "0" number. Do not worry about and appreciated what you done for me. However Girish code works perfect but i couldn't find the differences between yours and his code. Thank you once again for your support.