Excelmacros填充date单元格,但不等于真正的date单元格

我有一个函数,从被调用的API返回一个ODate(双数据types的date)。

Private Function CoreCompute(....) .... CoreCompute = oXmlHttp.ResponseText //sample return: a double value 41902, which is equivalent to 2014/09/20 End Function 

当这被调用到具有date格式的单元格时,它不会被转换为date值,也不会等于真正的date单元格。

我怎样才能输出一个单元格的值,可以与实际的date单元格值进行比较?

PS。 Q17实际上是Q16

模拟问题。 Q17实际上是Q16

尝试CoreCompute = CDbl(Trim(oXmlHttp.ResponseText))

这可能有效,因为你的回应是一个string,它可能包含空白。

Trim将删除空白

CDbl将确保该值被转换为数字types。