VBA SumIfs不适用于date范围

所以，我尝试了很多变化，但是我不能做这个工作：

var_sum = WorksheetFunction.SumIfs(Range("H:H"), Range("B:B"), str_client, Range("A:A"), "<=" & date_var) 

这个公式有两个条件。 第二个（date比较）将其分解并使总和= 0. date_var是Datevariables。 Excel中的date范围被格式化为date。

什么可能是错的？

Answer 1

我有一种感觉，你有一个string的date。

 Date_Var = "01/01/2013" 

您可以尝试使用CDate(或CLng(将其转换为适当的值，因为Excel将date存储为1900年1月1日以后的天数

 var_sum = WorksheetFunction.SumIfs(Range("H:H"), Range("B:B"), str_client, _ Range("A:A"), "<=" & CLng(date_var))