boucle FOR et somme.si

  • Initiateur de la discussion nicolas
  • Date de début
N

nicolas

Guest
boujour a tous
je desire faire dans une feuille bilan la somme de tout les produits fournis par un meme fournisseur. il y a une feuille par jour, j ai pense a une boucle FOR et somme.si mais je ne connais ni la syntaxe ni l endroit ou il fait lecrire.
Voila ce que je voudrais avec la syntaxe adequate.
for i=1 TO 31
'bilan'b6==SOMME.SI('i!B10:B16;Bilan!A6;'i'!D10:D16)
next i


merci de me corriger ceci et de me dire ou le mettre

merci d avance
 
D

Denis

Guest
Bonjour Nicolas, Baside et Le forum
ci dessous un petit exemple à recopier dans un module

Sub SommeSi()
Dim i%
Sheets('Bilan').Range('B6') = 0
For i = 1 To ThisWorkbook.Sheets.Count
If Sheets(i).Name = 'Bilan' Then GoTo Suite
With Sheets(i)
Sheets('Bilan').Range('B6') = Sheets('Bilan').Range('B6') + _
Application.WorksheetFunction.SumIf _
(.Range('B10:B16'), Sheets('Bilan').Range('A6'), .Range('D10:D16'))
End With
Suite:
Next
End Sub

Bon courage et à +
Denis
 

Discussions similaires

Statistiques des forums

Discussions
312 272
Messages
2 086 689
Membres
103 372
dernier inscrit
BibiCh