Microsoft 365 Compter le nombre de cellules filtrées

[team18fr]

Bonjour à tous,
Je pensais que ce serait facile mais je n'y arrive pas, donc j'ai une colonne dans laquelle j'ai des oui, non et vide et j'aurais voulus compter les cellules contenant une oui mais seulement celles qui sont affichées après filtre. Il peut y avoir plusieurs colonnes de filtrées et je n'arrive à rien avec la fonction "sous total"
Merci d'avance pour votre aide.

 

[job75]

Bonjour team18fr,

Pour ne pas se casser la tête utiliser une fonction VBA volatile :

Function Compte(plage As Range, critere)
Dim c As Range
Application.Volatile
For Each c In plage
    If Not c.Rows.Hidden Then If c = critere Then Compte = Compte + 1
Next
End Function

Filtrer sur la colonne B du fichier joint.

A+

 

[team18fr]

Merci c'est vraiment au top et ça marche super bien 👍

 

[job75]

Ah mais je suis surpris, il n'est pas nécessaire que la fonction soit volatile, fichier (2) avec :

Function Compte(plage As Range, critere)
Dim c As Range
For Each c In plage
    If Not c.Rows.Hidden Then If c = critere Then Compte = Compte + 1
Next
End Function

La fonction est aussi recalculée quand des lignes sont masquées manuellement.

Je suis sur Excel 2019, est-ce que cela est vrai sur toutes versions ?

 

[Usine à gaz]

Bonsoir Gérard, le Forum,

Chez moi office365, c'est pareil,
lionel 🙂

 

[job75]

Merci Lionel, il faudrait savoir ce qui se passe sur Excel 2007 ou 2003.

 

[sylvanu]

Bonsoir Team18, Lionel, Job,
Sur XL2007 idem, quel que soit la méthode de masquage, le fonctionnement est correct.

 

[Usine à gaz]

Malheureusement, je n'ai plus ces versions.

Allo .. Allo ... les amis à vos tests pour répondre à Gérard 🙂

 

[job75]

Merci sylvanu, donc sur Excel 2007 aussi il n'est pas nécessaire que la fonction soit volatile.

Au départ j'étais pourtant persuadé qu'il fallait qu'elle le soit.

 

[Usine à gaz]

Gérard URGENT Ne télécharge pas Windows 11 pour l'instant.
Voit mon #post dans le fil concerné 🙂

 

[Usine à gaz]

Windows 11

Bonsoir à tous, Je suis sur Windows10 et je reçois maintenant des propositions pour télécharger Windows 11. Je n'ai pas envie d'essuyer les plâtres mais qu'en pensent ceux qui ont choisi cette version ? Je sais que cela ne concerne pas vraiment Excel, quoique... Merci d'avance et A+

www.excel-downloads.com

 

[job75]

Merci Lionel; j'ai été voir le fil concerné.

 

[Usine à gaz]

OUI, j'ai vu 🙂

 

[sylvanu]

Au départ j'étais pourtant persuadé qu'il fallait qu'elle le soit.

En fait application.volatil n'est pas utile quand les plages exprimées dans la formules sont les seules à devoir être ré évaluées.
Si par contre des paramètres interviennent qui ne sont pas dans la formules alors volatil doit être précisé pour que la fonction soit systématiquement ré évaluée.
En PJ un exemple avec votre fonction une fois non volatile, une fois volatile.
Sauf que j'ai rajouté la valeur de H1, si celui ci vaut 0 alors la fonction doit renvoyer 0, si c'est 1 il renvoie la valeur.
On voit que si on met 0 seule la fonction volatile est ré évaluée, dans le premier cas le paramètre n'est pas pris en compte. ( Lien )

 

[job75]

Bien compris, merci sylvanu et bonne nuit.