Vba 区间数据

我需要根据日期总结一些信息。我的意思是，如果与信息相对应的日期在某个时间间隔内，我需要对一些信息求和

有什么办法吗

我看过“DATEDIFF”，但我需要的是：

'如果评估的数据在下一个间隔内被删除，则求和该值

希望你能理解我的问题

提前谢谢

---

编辑：我添加了一张图片以使其更易于理解

这样就可以了。我不知道你想在哪里使用total，所以现在你只需要得到一个messagebox

Sub SumBetweenTwoDates()

Dim total As Integer
total = 0

Dim firstDate As Date, secondDate As Date
firstDate = DateValue("20/11/2012")
secondDate = DateValue("20/12/2012")

For i = 1 To 5
    If Range("A" & i).Value >= firstDate And Range("A" & i).Value <= secondDate Then
        total = Range("B" & i).Value + total
    End If
Next i

MsgBox total

End Sub

两个日期之间的次消费（）
将总计设置为整数
总数=0
Dim firstDate作为日期，secondDate作为日期
firstDate=DateValue（“20/11/2012”）
secondDate=DateValue（“2012年12月20日”）
对于i=1到5
如果Range（“A”&i）.Value>=firstDate和Range（“A”&i）.Value在要求和的单元格中使用一个公式：

假设值为A1:A100，日期为B1:B100

=SUMPRODUCT((B1:B100>=DATEVALUE("1/1/2004"))*(B1:B100<=DATEVALUE("31/1/2004")),A1:A100)

=SUMPRODUCT（（B1:B100>=DATEVALUE（“1/1/2004”））*（B1:B100是否要在工作表中以特定的值输入两个日期？您知道如何进行更改吗？：）是的，我知道如何进行更改，再次感谢Hanks，我不知道我可以在日期中使用“如果”一词。您几乎可以在IF:P中使用任何内容