Scan Range of Cells for 0

[Legacy 185509]

Hi
I need to Scan Certain Range of Cell in Column for 0
if it is 0 than delete the whole row
please help me do this you will save my life
thank you

 

[wigi]

You use an Autofilter, and filter on the value 0.

Select the cells it returns, and delete the rows.

 

[Legacy 185509]

I cannot do that,
I want to make macro of it
if i use autofilter my whole current macro will go use less

 

[wigi]

For instance, if the 0's are in column A and your sheet is set up well:

    With Sheets("NameOfTheSheet").UsedRange
        .AutoFilter 1, 0
        .Offset(1).EntireRow.Delete
        .AutoFilter
    End With

You should provide the name of the sheet where I indicated: Sheets("NameOfTheSheet")
Or, you could use ActiveSheet instead.

Wigi