Thank you, Justin. This is just beyond me. I haven't used macros or anything
else and I can't figure this out. I'll keep reading and see if I can find
something that helps. Thank you again for your kind help.

Becki

"Justin Case" wrote:

Hi Becki,

Here's a possible solution using autofilter. Select any cell in the
list then...

Sub(FilterD)
'assuming the list starts in column A...
Selection.AutoFilter Field:=4, Criteria1:="0", Operator:=xlAnd
End Sub

Autofilter will remain on after the macro has run.

To turn it off with a macro

Sub FilterOff()
Selection.AutoFilter
End Sub

All of the above can easily be assigned to toolbars, buttons, etc. (or
can be accessed from the menu of course).

Regards,
Justin