Total du nombre de fois d'un mot dans des cell et feuilles

Résolu/Fermé
Annie Gareau - 9 nov. 2016 à 20:01
 Annie Gareau - 10 nov. 2016 à 15:24
Bonjour,

J'ai un classeur avec plusieurs feuilles et j'aimerais savoir comment compter le nombre de fois qu'un mot est inscrit dans chacune des feuilles pour une ligne précise.

Exemple: j'ai fait un sondage pour savoir combien de personne habite dans chaque maison et qui dans ces personnes sont en emploi ou pas. Donc dans chacune des feuille, j'au une colonne pour chacune des personnes habitant à la même adresse

je veux donc additionner le nombre de fois où il est inscrit employed dans les cellules D27 à O27 de toutes les feuilles du classeur (J'ai un classeur de 170 feuilles)
Merci


2 réponses

ccm81 Messages postés 10853 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 avril 2024 2 404
9 nov. 2016 à 20:32
Bonjour

Un exemple avec une fonction personnalisée (macro)
http://www.cjoint.com/c/FKjtFC3M6gn

Cdlmnt
0
ca ne fonctionne pas :(
ca calcule le nombre de 'employed' dans la feuille seulement mais pas dans tout le classeur (les 117 feuilles ensemble)

Voici ce que j'essai:
=NB.SI('117 Nouchimi:196 Shabow'!D27:O27;"employed")
0
Annie Gareau
10 nov. 2016 à 02:03
J'ai aussi essayé cela:
=SOMMEPROD(NB.SI(INDIRECT({"117 Nouchimi:196 Shabow"}&"!"&{"d27:o27"});"employed"))
mais fonctionne toujours pas!
0
ccm81 Messages postés 10853 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 avril 2024 2 404
Modifié par ccm81 le 10/11/2016 à 11:36
ca ne fonctionne pas :(
ca calcule le nombre de 'employed' dans la feuille seulement mais pas dans tout le classeur (les 117 feuilles ensemble)

1. Alt-F11 pour accéder à l'éditeur vba
2. Insertion/Module
3. Copier tout le code
Public Function Compter(plage As Range, s As String) As Long
Dim n As Long, f As Worksheet, k As Long, adr As String
n = 0
adr = plage.Address
For Each f In Sheets
n = n + Application.WorksheetFunction.CountIf(f.Range(adr), s)
Next f
Compter = n
End Function
4. retour dans la feuille
5. Dans une cellule, ceci
=Compter(D7:O27;"employed")
devrait fonctionner
0
Annie Gareau
10 nov. 2016 à 15:24
haaaaa trop génial!!!! merci merci!!
Votre aide a été d'un très grand secours
merci encore tout fonctionne
0