Excel - Conditional deletion of rows

Ask a question


I have a spreadsheet where column A is a project name then columns B, C and D are financial data for the specific project. What I would like to do is delete the entire row for the project only if columns B, C and D contain zero's. I can set up a filter and filter out zero's for 1 specific column, but in many of the rows only 1 or 2 of the 3 columns are zero's so that does not work.


Try with this macro (assuming that the first row contained the titles).

Public Sub DELETE_Rows_CellZero_Col_B_C_D()  
Dim x As Long  
Dim y As Long  
x = Range("C65536").End(xlUp).Row  

For y = x To 2 Step -1  

    If Cells(y, 2).Value = 0 And Cells(y, 3).Value = 0 And Cells(y, 4).Value = 0 Then  
    End If  

Next y  
End Sub

Excel - Set first letter in uppercase
Excel 2007 - All files are being opened in the same window