Compter le nombre de fois qu'une valeur apparait dans un classeur (vba)

sevy1 · 11 Septembre 2014

Bonjour le forum
J'ai un classeur dont j'ai renommé les feuilles; dans chaque feuille à la colonne C je saisis les numéros de dossiers, je souhaiterai saisir un numéro de dossier dans une cellule A1 par exemple , le rechercher dans tous le classeur et me renvoyer le nombre de fois qu'il l'a trouvé dans ce classeur.
Une solution VBA serait préferable.
Merci d'avance pour vos contributions

job75 · 11 Septembre 2014

Re : Compter le nombre de fois qu'une valeur apparait dans un classeur (vba)

Bonsoir sevy1,

Dans un module standard coller cette fonction VBA :

Code:

Function Compte(valeur, colonne)
Application.Volatile
Dim w As Worksheet
For Each w In Worksheets
  Compte = Compte + Application.CountIf(w.Columns(colonne), valeur)
Next
End Function

A coté de la cellule A1 contenant le numéro de dossier entrer la formule :

Code:

=Compte(A1;3)

3 correspond bien sûr à la colonne C.

Edit : ajouté Application.Volatile pour que la fonction se recalcule si l'on modifie les valeurs dans les feuilles.

Bonne fin de soirée.

sevy1 · 12 Septembre 2014

Re : Compter le nombre de fois qu'une valeur apparait dans un classeur (vba)

Bonjour
Une fois de plus merci pour votre aide et pour vos explications limpides (lication.Volatile).
Votre solution marche. Bonne journée

Compter le nombre de fois qu'une valeur apparait dans un classeur (vba)

sevy1

XLDnaute Occasionnel

job75

XLDnaute Barbatruc

sevy1

XLDnaute Occasionnel

Discussions similaires