récupérer en vb le nombre de lignes d'un filtre

[pete]

Dans un tableau excel j'exécute en VB un filtre et je voudrai récupérer le nombre de lignes corespondant à ce filtre. (cette information est dans la barre de status après le filtre xx enregistrements sur xxx) Existe-t-il un objet qui aurait cette information.

 

[STephane]

bonsoir pete

Nombre d'enregistrements dans une liste filtrée :

With range("_FilterDatabase").rows
Records_Total = .Count - 1
Records_Found = .SpecialCells(xlVisible).Count - 1
End With

ou

pour des valeurs numériques ou non
="" & sous.total(3;A5:A23) & " of " & nb.val (A5:A23)

ou encore pour des valeurs numériques seulement : ="" & Sous.total(2;B5:B23) & " of " & nb(B5:B23)


bye
STéphane