将长Excel工作表公式转换为VBA公式

我试图在单个date/date内对logging进行计数。 我计数的字段格式为:

"m/d/yyyy hh:mm:ss" 

下面的公式在工作表上工作得很好

 =COUNTIFS(Database!B:B,">="&DATE(YEAR(RFQReceived),MONTH(RFQReceived),DAY(RFQReceived)) + TIME(0,0,0),Database!B:B,"<="&DATE(YEAR(RFQReceived),MONTH(RFQReceived),DAY(RFQReceived))+TIME(23,59,59)) 

我在VBA上尝试了以下,但给我types不匹配错误。 如何正确写入VBA格式?

 RecordNum = Evaluate("COUNTIFS(Database!B:B,">="&DATE(YEAR(RFQReceived),MONTH(RFQReceived),DAY(RFQReceived)) + TIME(0,0,0),Database!B:B,"<="&DATE(YEAR(RFQReceived),MONTH(RFQReceived),DAY(RFQReceived))+TIME(23,59,59))") 

感谢您的帮助。

你需要加倍"

 RecordNum = Evaluate("COUNTIFS(Database!B:B,"">=""&DATE(YEAR(RFQReceived),MONTH(RFQReceived),DAY(RFQReceived)) + TIME(0,0,0),Database!B:B,""<=""&DATE(YEAR(RFQReceived),MONTH(RFQReceived),DAY(RFQReceived))+TIME(23,59,59))")