auto filter macro

I want to use auto filter or some other device to hide
those rows whose first column has a zero in it. I would
like to come up with a macro that automatically does
this. The purpose is to have a sales order whose first
column of every row is the quanity of each item ordered.
If zero is ordered than that row would be hidden. This
sales order would be linked to a data input sheet where
the actual input would take place. Please help!!!

Try recording a macro (Tools Macro Record New Macro)
that apply an autofilter (Data Filter AutoFilter) to
your sheet and filter for "0" in column A.

HTH
Jason
Atlanta, GA

-----Original Message-----
I want to use auto filter or some other device to hide
those rows whose first column has a zero in it. I would
like to come up with a macro that automatically does
this. The purpose is to have a sales order whose first
column of every row is the quanity of each item ordered.
If zero is ordered than that row would be hidden. This
sales order would be linked to a data input sheet where
the actual input would take place. Please help!!!
.

This will do it. If you want to hide, use as is, to delete change the
comment line

Sub delblanks()
With Range("a2:a" & Cells(65536, "a").End(xlUp).Row) 'Selection
'.SpecialCells(xlBlanks).EntireRow.Delete
.SpecialCells(xlBlanks).EntireRow.Hidden = True
End With
End Sub


--
Don Guillett
SalesAid Software

wrote in message
...
I want to use auto filter or some other device to hide
those rows whose first column has a zero in it. I would
like to come up with a macro that automatically does
this. The purpose is to have a sales order whose first
column of every row is the quanity of each item ordered.
If zero is ordered than that row would be hidden. This
sales order would be linked to a data input sheet where
the actual input would take place. Please help!!!

to filter non-blanks
Sub filteroutblanks()
Range("A13:C18").AutoFilter Field:=1, Criteria1:=""
End Sub

--
Don Guillett
SalesAid Software

"Don Guillett" wrote in message
...
This will do it. If you want to hide, use as is, to delete change the
comment line

Sub delblanks()
With Range("a2:a" & Cells(65536, "a").End(xlUp).Row) 'Selection
'.SpecialCells(xlBlanks).EntireRow.Delete
.SpecialCells(xlBlanks).EntireRow.Hidden = True
End With
End Sub


--
Don Guillett
SalesAid Software

wrote in message
...
I want to use auto filter or some other device to hide
those rows whose first column has a zero in it. I would
like to come up with a macro that automatically does
this. The purpose is to have a sales order whose first
column of every row is the quanity of each item ordered.
If zero is ordered than that row would be hidden. This
sales order would be linked to a data input sheet where
the actual input would take place. Please help!!!

for ZEROS

Range("A13:C18").AutoFilter Field:=1, Criteria1:="0"


--
Don Guillett
SalesAid Software

"Don Guillett" wrote in message
...
to filter non-blanks
Sub filteroutblanks()
Range("A13:C18").AutoFilter Field:=1, Criteria1:=""
End Sub

--
Don Guillett
SalesAid Software

"Don Guillett" wrote in message
...
This will do it. If you want to hide, use as is, to delete change the
comment line

Sub delblanks()
With Range("a2:a" & Cells(65536, "a").End(xlUp).Row) 'Selection
'.SpecialCells(xlBlanks).EntireRow.Delete
.SpecialCells(xlBlanks).EntireRow.Hidden = True
End With
End Sub


--
Don Guillett
SalesAid Software

wrote in message
...
I want to use auto filter or some other device to hide
those rows whose first column has a zero in it. I would
like to come up with a macro that automatically does
this. The purpose is to have a sales order whose first
column of every row is the quanity of each item ordered.
If zero is ordered than that row would be hidden. This
sales order would be linked to a data input sheet where
the actual input would take place. Please help!!!