Excel VBA中的Date类型的匹配问题
- 2023-02-17
- 来源/作者： Wps Office教程网/ 菜鸟图库
- 136 次浏览
VBA的Date类型比较奇怪。
测试：
1. 新建一个空白的Excel文档，在A1单元格输入2009-11-12。
2. 打开VBA编辑器，插入模块，增加下面这个宏
Sub test() MsgBox #11/12/2009# = Range("A1").Value ' true MsgBox VarType(#11/12/2009#) = VarType(Range("A1").Value) ' true MsgBox Application.WorksheetFunction.Match(#11/12/2009#, Range("A1"), 0) ' errorEnd Sub
3. 按F5运行test宏，可以看到Range("A1")的类型和值都和#11/12/2009#一致（通过对range("A1")的监视也可以看出这一点），都是Date类型，但是如果用match去匹配的话，却出现错误。
解决方法，在匹配中将要匹配的Date类型的数据强制转换成Long类型去匹配。
MsgBox Application.WorksheetFunction.Match(CLng(#11/12/2009#), Range("A1"), 0)
对其原理还是不清楚，不知道有没有看到的高手来做一下解释。
