Never thought of using the filter. Beautiful! Thanks!

"Brotha lee" wrote:

Use autofilter and then custom. Here you can filter all values 0 and then
delete the rows or

use the following code to do it

Columns("A:A").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="0", Operator:=xlAnd

Set rng = Range("a1").CurrentRegion
rng.Offset(1, 0).Resize(rng.Rows.Count - 1, _
rng.Columns.Count).Select
Selection.EntireRow.Delete

"Tony P." schreef:

Okay, I'm stumped. Here is what I want to do:

Colum F contains inventory quantities. I want to delete all rows where
inventory numbers in column F are 0. I know there is a way to do this but I
can't seem to figure it out. Any help is much appreciated as always!

Tony P.