Fonction NB.SI sur plusieurs onglet

[iosis]

Bonjour,

je souhaite compter dans la C1 la valeur X si elle est présente de différents onglets. Si possible avec une macro qui puisse être mise à jour lorsque j'ajoute un nouvel onglet.
J'ai essayé le macro suivante sans résultat :

Sub somme()

somme = 0
For i = X To ThisWorkbook.Sheets.Count
somme = somme + Sheets(i).Range("C1").Value
Next i
Sheets(1).Cells(1, 1).Value = somme

End Sub

Merci à vous

Antoine

 

[ROGER2327]

Re : Fonction NB.SI sur plusieurs onglet

Bonjour iosis

Je viens d'essayer et ça fonctionne à deux conditions :

1. X doit être un entier (inférieur au nombre de feuilles...)
2. Les données figurant dans les cellules C1 des différentes feuilles doivent être compatibles avec l'addition.

Attention : ce code ne compte pas les valeurs contenues dans les cellules C1, mais additionne les valeurs qu'elles contiennent (si cela est possible : voir 2.).
​

ROGER

 

[Hulk]

Re : Fonction NB.SI sur plusieurs onglet

Hello Iosis, Forum 😀

Pas sûr d'avoir bien compris, mais essaye ceci

Sub somme()

Dim somme As Integer

somme = 0
For i = 1 To ThisWorkbook.Sheets.Count
somme = somme + Sheets(i).Range("C1").Value
Next i
Sheets(1).Cells(1, 1).Value = somme

End Sub

Cdt, Hulk.

Edit : Slt Roger 🙂

 

[BOISGONTIER]

Re : Fonction NB.SI sur plusieurs onglet

Bonjour,

-S'il s'agit de calculer une somme 3D, il y a la formule =SOMME(Feuil1:Feuil5!A1)
-Pour les sommes ou comptes 3D conditionnelles:

Formules Matricielles

JB