Bonjour à toutes et à tous,

Je voulais, sur les conseils du forum, utiliser sous.total pour compter dans un tableau filtré mais il y a une condition. Malgré la patience et les conseils de différentes personnes, je ne suis pas arrivé au résultat voulu.

J'ai donc trouvé sur le net cette formule qui fonctionne bien excepté qu'elle prend en compte les cellules vides et je voudrais qu'elle ne compte pas les cellules vides.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Function CompterPositifs(Plage As Range)
    Dim C As Range
    Application.Volatile
    For Each C In Plage
        If C.EntireRow.Hidden = False And C.Value > 0 Then
            CompterPositifs = CompterPositifs + 1
        End If
    Next C
End Function
Comment puis je faire pour que les cellules vides ne soient pas comptées ?

Merci pour vos avis et aides.

Bon week end