Compter le nombre de lignes d'une plage de cellule filtree
Résolu/Fermé
A voir également:
- Compter le nombre de lignes d'une plage de cellule filtree
- Aller à la ligne dans une cellule excel - Guide
- Excel compter le nombre de cellule contenant le même texte ✓ - Forum Excel
- Excel compter le nombre de caractères spécifique dans une cellule ✓ - Forum Excel
- Site de vente en ligne particulier - Guide
- Frédéric cherche à faire le buzz sur les réseaux sociaux. il a ajouté une image de manchots sur une image de plage. retrouvez l'image originale de la plage. que cachent les manchots ? - Forum Musique / Radio / Clip
1 réponse
J'ai trouve cette fonction pour repondre a ca :
Function Count_Filtered_Rows()
Dim UpperLeftCorner As Range
' UpperLeftCorner should be set to the upper-left
' corner of the list range:
Set UpperLeftCorner = Sheets(2).Range("A1")
RowCount = -1
For Each area In _
UpperLeftCorner.CurrentRegion.SpecialCells(xlVisible).Areas
Count_Filtered_Rows = Count_Filtered_Rows + area.Rows.Count
Next
End Function
mais, le probleme est que si le contenu est vide, cela ne lui pose pas de probleme....
Function Count_Filtered_Rows()
Dim UpperLeftCorner As Range
' UpperLeftCorner should be set to the upper-left
' corner of the list range:
Set UpperLeftCorner = Sheets(2).Range("A1")
RowCount = -1
For Each area In _
UpperLeftCorner.CurrentRegion.SpecialCells(xlVisible).Areas
Count_Filtered_Rows = Count_Filtered_Rows + area.Rows.Count
Next
End Function
mais, le probleme est que si le contenu est vide, cela ne lui pose pas de probleme....
24 oct. 2012 à 11:13
Avez vous essayé avec ça :
MsgBox Feuil1.AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible).Cells.Count
Bonne suite
25 oct. 2012 à 09:09
A bientot!!