首页 > Excel专区 > Excel函数 >

Excel VBA中的Date类型的匹配问题

Excel函数 2022-02-11 18:04:24

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)

对其原理还是不清楚,不知道有没有看到的高手来做一下解释。


标签: 匹配类型这一点都是excel函数

office教程网 Copyright © 2016-2020 https://www.office9.cn. Some Rights Reserved.