Count only Filtered Rows

Hi Guys,

I have a database that has a filter applied, and the filters are used. How do i count only the number of rows that are displayed; (that meet the filter criteria); in VBA

Sheet where filter is applied : "Database"
1st Row is a header row
Used Range Col A:P

For example I apply the filter to only display rows that have the value "Jordan" in column J.
Every Tenth Row in the filtered range contains "Jordan" so the following rows are shown
Rows: 10, 20, 30, 40, 50, etc etc.
therefore i want the macro to return the number of rows that are filtered. If 100 rows are present, then 10 "Jordan"s are found and the result should be 10
Speculative example only

Regards