Hide show blanks

Hi
I have an Excel sheet that has the AUTO FILTER ON
I would like a macro that will hide all the blanks in a col when that col is
selected
Would appreciate any help

Thanks

This will select all non-blanks in Column A:

Columns("A:A").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="<>"

"PCOR" wrote:

> Hi
> I have an Excel sheet that has the AUTO FILTER ON
> I would like a macro that will hide all the blanks in a col when that col is
> selected
> Would appreciate any help
>
> Thanks
>
>
>

Thanks...but....can you give me a macro that will show all non blanks and
"any selected column"
Thanks

"Toppers" <Toppers@discussions.microsoft.com> wrote in message
news:251355F1-C500-4E7E-9D2B-A70BA226E40C@microsoft.com...
>
> This will select all non-blanks in Column A:
>
> Columns("A:A").Select
> Selection.AutoFilter
> Selection.AutoFilter Field:=1, Criteria1:="<>"
>
> "PCOR" wrote:
>
>> Hi
>> I have an Excel sheet that has the AUTO FILTER ON
>> I would like a macro that will hide all the blanks in a col when that col
>> is
>> selected
>> Would appreciate any help
>>
>> Thanks
>>
>>
>>

Possibly:

Selection.EntireColumn.AutoFilter Field:=1, Criteria1:="<>"

--
Regards,
Tom Ogilvy

"PCOR" <ianmacfa@hotmail.com> wrote in message
news:RqOdnS6IwdxhdQjfRVn-vQ@rogers.com...
> Thanks...but....can you give me a macro that will show all non blanks and
> "any selected column"
> Thanks
>
> "Toppers" <Toppers@discussions.microsoft.com> wrote in message
> news:251355F1-C500-4E7E-9D2B-A70BA226E40C@microsoft.com...
> >
> > This will select all non-blanks in Column A:
> >
> > Columns("A:A").Select
> > Selection.AutoFilter
> > Selection.AutoFilter Field:=1, Criteria1:="<>"
> >
> > "PCOR" wrote:
> >
> >> Hi
> >> I have an Excel sheet that has the AUTO FILTER ON
> >> I would like a macro that will hide all the blanks in a col when that
col
> >> is
> >> selected
> >> Would appreciate any help
> >>
> >> Thanks
> >>
> >>
> >>
>
>

Worked great...thanks
"Tom Ogilvy" <twogilvy@msn.com> wrote in message
news:O0rtgngYFHA.3712@TK2MSFTNGP10.phx.gbl...
> Possibly:
>
> Selection.EntireColumn.AutoFilter Field:=1, Criteria1:="<>"
>
> --
> Regards,
> Tom Ogilvy
>
> "PCOR" <ianmacfa@hotmail.com> wrote in message
> news:RqOdnS6IwdxhdQjfRVn-vQ@rogers.com...
>> Thanks...but....can you give me a macro that will show all non blanks and
>> "any selected column"
>> Thanks
>>
>> "Toppers" <Toppers@discussions.microsoft.com> wrote in message
>> news:251355F1-C500-4E7E-9D2B-A70BA226E40C@microsoft.com...
>> >
>> > This will select all non-blanks in Column A:
>> >
>> > Columns("A:A").Select
>> > Selection.AutoFilter
>> > Selection.AutoFilter Field:=1, Criteria1:="<>"
>> >
>> > "PCOR" wrote:
>> >
>> >> Hi
>> >> I have an Excel sheet that has the AUTO FILTER ON
>> >> I would like a macro that will hide all the blanks in a col when that
> col
>> >> is
>> >> selected
>> >> Would appreciate any help
>> >>
>> >> Thanks
>> >>
>> >>
>> >>
>>
>>
>
>