VBA - Nombre de lignes filtrées ?
Bonjour,
Je ne trouve pas le moyen d'obtenir le nombre de lignes sélectionnées après application d'un filtre ?
Par exemple: je filtre une feuille sur un ou plusieurs champs (pour illustration, ici le ch 4 et le ch 5)
ActiveSheet.Range("$A$1:$L$730").AutoFilter Field:=4, Criteria1:="=B*", _
Operator:=xlAnd
ActiveSheet.Range("$A$1:$L$730").AutoFilter Field:=5, Criteria1:="=B*", _
Operator:=xlAnd
Le traitement que je veux faire ensuite dépend du nombre de lignes qui ont été ainsi sélectionnées (en particulier si ce nombre est zero).
En dépit de plusieurs recherches et essais, je n'ai rien trouvé, ni méthode ni attribut ... J'ai sans doute mal cherché et je remercie par avance ceux qui pourront me sortir de ce problème!
Salutations
Bonjour
Essayes
NbLg = WorksheetFunction.Subtotal(3, Columns(1)) - 1Remplaces 1 par le numéro de colonne voulu
Bonjour sergio, banzai,
@Banzai
Le problème avec cette façon de faire c'est que s'il y a du vide dans les lignes filtrées, ça ne les prendra pas en compte.
Une solution :
nbLg = Range("_FilterDataBase").Resize(, 1).SpecialCells(xlCellTypeVisible).Count - 1