我将项目存储在字典中，其中键为date，例如'2012/05/11'。默认情况下，该键被改为数字（41040）。 当我想要检索该项目时，我需要通过编号：dFRmonths.Item（41040）来引用它。 由于dFRmonths.Item（“2012/05/11”）不存在。
我只有date，而不是数字，所以我需要将date转换为数字，然后使用数字进行查找。
尝试将date转换为数字会导致“溢出”错误：
IntMonth = CInt("2012/05/11") 任何想法如何改变“2012/05/11”到41040，所以我可以看看它？
谢谢！
一个小窍门！
Sub dural() IntMonth = CLng(CDate("2012/05/11")) MsgBox IntMonth End Sub
这是因为CDate（）是非常灵活的。
标签：11,VBA,数字,05,IntMonth,EXCEL,date,DATE,2012 From： https://www.cnblogs.com/Insist-Y/p/17057992.html