Calcul d'une somme entre deux dates

Bonsoir,

j'ai un petit souci vba où je ne suis pas expert comme beaucoup d'entre vous.
j'ai un tableau

en colonne 1 : des dates
en colonne 2 : des valeurs

nombre de lignes variables

dans une seconde feuille, je souhaite faire la somme des valeurs (en colonne B) si elles correspondent à des jours du mois de novembre par exemple
30/10/08 0,500
04/11/08
22/11/08 10,000
23/11/08 7,000
24/11/08 9,000
25/12/08 31,000
comment peut-on traduire cela en vba

Merci à vous tous

Bonsoir,
regardes ce code, essayes le sur fichier vierge et adaptes à tes besoins, sans plus d'explications

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Sub test() Dim x As Integer Dim dt1 As Date, dt2 As Date dt1 = InputBox("date debut") dt2 = InputBox("date fin")   With Sheets("feuil1") For x = 2 To .Range("a" & .Rows.Count).End(xlUp).Row 'sil n'y a que des dates en col A If .Range("a" & x) >= dt1 And .Range("a" & x) <= dt2 Then Sheets("feuil2").Range("a1") = Sheets("feuil2").Range("a1") + .Range("b" & x) End If Next x End With End Sub

---

bonne soirée

Bonsoir l'ami

on est pas expert pour rien, chapeau bas

Code:

---

Sheets("feuil2").Range("a1") = Sheets("feuil2").Range("a1") + .Range("b" & x)

---

je ne comprends pasbien cette formule avexc 2 fois range A1
ca fonctionne bien, je vais essayer de l'adapter à mon projet

merci beaucoup

2 fois range("a1") pour faire la somme, A1 garde la 1ere valeur de la 1ere cellue correspondante et au fur et à mesure incrément avec les nouvelles données, mais il y a d'autres solutions

Bonne nuit ou bonne soirée

Oui ça boucle c'est vrai.
En tout cas grand merci à vous surtout pour la rapidité je suis bluffé.
Oui il y a peut être également une soluce avec Sommeprod en vba ??
Bonne soirée

Si cette solution te convient et que tu ne comptes pas poursuivre le sujet, penses à mettre "RESOLU"

a +