Problem with creating range with visible cells

[sharshra]

I am trying to create a range with visible cells after filtering based on a criteria. But, facing some wierd problem with setting correct range with visible cells. Here is the code. Can anyone help to resolve this?

Please Login or Register  to view this content.

Here,

Please Login or Register  to view this content.

returns correct values. For example, for a particular filtered criteria, if there are 6 rows, it returns 42 (6 rows * 7 columns).
However,

Please Login or Register  to view this content.

always returns 1 (header row), though there are 6 rows. How can this be fixed?

[Andy Pope]

You need to process areas if the range is not contiguous

Please Login or Register  to view this content.

[sharshra]

Andy,
Thanks for quick reply. I am using this piece of code in vb.net & want to create the range of filtered cells & use it later. It is not just for reading the total rows. There must be a way to create correct range of visible cells & read it's values.

[Andy Pope]

regardless of language you will need to use the areas object to get to each non contiguous area of the range.