All rows would be

rng.Rows.Count

where rng is the original range being filtered,

visible rows would be

Rng.SpecialCells(xlCellTypeVisible).Count

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"pete the greek" wrote in message
...
having applied an auto filter in vba how do i indentify the first and last
row of the result also is it possible to read the number of rows. i assume
this is held somewhere as it is used in the status bar message