Hiding empty columns in range

[jhonneyboy]

I am trying to hide columns in a range, "P8:ET1087" but it isn't working. After I autofilter a value, every row will be hidden except for the rows where the value is found. This is always 6 rows, won't be more or less.

The 6 cells in every column are the same and contain from 1 to 6:
Text
Text
Date
Number
Text
Date

What I am trying to do is to hide the column if all cells in that column are blank/empty after it's autofiltered. That for the 135 columns, from P to ET.

I was messing around with the following code:

Please Login or Register  to view this content.

But it doesn't seem to work, what am i doing wrong? Can somebody help me?

[GeneralDisarray]

I think i have a good idea, but would need an example worksheet to play with.

Please post a toy example.

[Vikas_Gautam]

Got what you need..
Try this code...

Please Login or Register  to view this content.

waiting for *

[jhonneyboy]

Doesn't seem to work and takes about 1 min till it's done, but nothing happens...

[berlan]

Hi jhonneyboy, try this:

Please Login or Register  to view this content.

Subtotal(3,ref) can be used as the counta function for a filtered range.

Hope this works for you.

Cheers,
berlan