Count of Filtered Data Failing If Then Statement

[Jenn68]

The code below filters a worksheet (ws_salt) of all rows that fall between an lower date (f_lr) and upper date (f_ur).
If Then code then determines whether the filter was returned empty.

In my testing on particular date rate that should be empty, displays empty after the filter is applied, but the "if worksheetFunction.Count(.Cells.SpecialCells(xlCellTypeVisible)) = 0" is failing. It is being treated as though there is filtered data, when it shouldn't. This worksheet does have data in it that doesn't match the filter criteria, so the filter appears to be working (it's coming back empty).

Please Login or Register  to view this content.

I use the exact same on another similar worksheet (that doesn't yet contain any data let alone data meeting the criteria) and it works fine.

[Mumps1]

Try:

Please Login or Register  to view this content.

The macro assumes you have headers in row 1 and the data starts in row 2.

[Fluff13]

f_range is your headers, so counting the number of visible cells on that range will never give 0

[Jenn68]

f_range is your headers, so counting the number of visible cells on that range will never give 0

So true. Thanks for bringing that to my attention Fluff.

I took the if then statement out of the with f_range, and made it of itself ...

Please Login or Register  to view this content.

[Fluff13]

You're welcome & thanks for the feedback