Excel - Conditional deletion of rows

April 2018


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
Published by aakai1056. Latest update on October 6, 2012 at 05:15 AM by jak58.
This document, titled "Excel - Conditional deletion of rows," is available under the Creative Commons license. Any copy, reuse, or modification of the content should be sufficiently credited to CCM (https://ccm.net/).
Excel - Set first letter in uppercase
Excel 2007 - All files are being opened in the same window