Counting records in a filtered list

[plato]

How can I count the number of records in a filtered list. The list gives me
the record number on the left so how can I count (other than manually) the
number of records that exist in that list?

 

[Frank Kabel]

Hi
=SUBTOTAL(3,A1:A100)

 

[Debra Dalgleish]

To programmatically count the rows, you can use the code shown here:

http://www.contextures.com/xlautofilter03.html#Count

'====================
Sub CountVisRows()
'by Tom Ogilvy
Dim rng As Range
Set rng = ActiveSheet.AutoFilter.Range

MsgBox rng.Columns(1). _
SpecialCells(xlVisible).Count - 1 _
& " of " & rng _
.Rows.Count - 1 & " Records"

End Sub
'===============================