SumIfs на VBA 2016

Question

Я сделал коды в Excel 2007, и все прошло хорошо.Затем я снова открыл его в Excel 2016, но значение оказалось равным нулю.Я пытался найти решение, но не нашел.Кто-нибудь может мне помочь?

Вот некоторые из моих кодов:

Set today1 = Range("C2")
Set BeginWeek = Range("C5")
Set MilkTableP = Range("MilkTable[Total Plan]")
Set datemilk = Range("MilkTable[Date]")

Range("O1").Value = Application.WorksheetFunction.SumIfs _
        (MilkTableP, datemilk, ">=" & BeginWeek, _
        datemilk, "<" & today1)

Большое вам спасибо

Answer 1

Конвертируйте вашу дату в длинную:

Range("O1").Value = Application.WorksheetFunction.SumIfs _
        (MilkTableP, datemilk, ">=" & BeginWeek, _
        datemilk, "<" & CLng(Today1))