aantal uitgefilterde regels in macro opvragen

[AnnevdD]

Ik maak regelmatig gebruik van de filter functie in Excel. Dat doe ik ook in VBA macro's.
Mijn vraag is: als ik in Excel filter zie ik linksonder het aantal gevonden records. Kan je ook bij het filteren in een macro ergens zien hoeveel records er zijn gevonden?

 

[JEC.]

Sub jec()
 With Cells(1).CurrentRegion
  .AutoFilter 1, Array("1", "4"), 7
  MsgBox Application.Subtotal(3, .Offset(1).Columns(1))
 End With
End Sub

of

Sub jec()
 With Cells(1).CurrentRegion
  .AutoFilter 1, Array("1", "4"), 7
  MsgBox .Parent.AutoFilter.Range.Columns(1).SpecialCells(12).Count - 1
 End With
End Sub

 

[AnnevdD]

Hartelijk dank. Ik kende de specialcells opties niet.
Ik ga hier mee aan de slag.
Veel dank.

 

[snb]

Sub M_snb()
  With Cells(1).CurrentRegion
    .AutoFilter 1, "snb"
    Application.StatusBar = .Columns(1).SpecialCells(12).Count - 1 & " records"
  End With
End Sub