fonctions sur plusieurs feuilles d'un classeur

xalis à dit:

Calculer le nombre d'occurrence dans plusieurs feuilles d'un classeur.

Je dispose d'un classeur avec plusieurs feuilles dont le nombre peut varier(2 à 30). une feuille récapitulative -nommée : synthèse-, une feuille modèle -nommée : Organ- qui sert de base et à partir de laquelle sont créées les autres -nommées : Orga (1), Organ (2), etc... Ces dernières sont remplies par des usagers.
dans la feuille "synthèse" j'affiche certaines informations (min, max, moyenne... des données issues des feuilles Orga (1)...)
Mais j'ai besoin aussi de compter le nombre de réponses identiques sur certaines cellules des feuilles remplies (Organ (1) à ....).
J'ai utilisé NB.SI('Organ:Organ(1)'!B5;1) pour espérer obtenir le nombre de réponses égales à "1" dans la cellule B5 de chaque feuille -Organ à Organ(1)- sachant que Organ est une feuille "vierge" sauf les intitulés, mais j'obtien toujours un (#VALEUR!)

Merci d'avance pour toute l'aide...

Cliquez pour agrandir...

mjo à dit:

Bonjour,

La fonction NB.SI ne fonctionne que pour une plage de données.
Elle ne peut donc être employée pour plusieurs feuilles à la fois, car il y a plusieurs plages.

Par contre il y a moyen d'additionner les mêmes cellules de plusieurs feuilles, ou même d'en calculer la moyenne.

mjo

Cliquez pour agrandir...

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim F As Worksheet
If Sh.Name <> "Synthèse" Then Exit Sub
Range("C39") = 0
For Each F In Worksheets
    If Left(UCase(F.Name), 3) = "ORG" Then
        If F.Range("B44") = 1 Then Range("C39") = Range("C39") + 1
    End If
Next F
End Sub