[已解决]VBA中使用match函数的疑问

蝶·舞

    sn = Range("A1").Resize(1).Value
    MsgBox Application.WorksheetFunction.Match([a1], sn, False)

在这段代码中，如果红字部分是1的话，此代码执行会提示错误、
但如果则红字的1改成大于1的任何整数，则能正常返回结果。

PS：这段代码是我简化的，各位不必纠结于我为什么要用sn变量来过渡，我只想明白，为什么此处不能用1，因为按我的理解，此处用1的话，也就是返回A1单元格，那么这个再用match按理不应该会出错啊

最佳答案

月排行榜 / 总排行榜

xdragon

2014-8-23 20:12

match在vba中的使用和工作表中有略微的差别的
参数的帮助文件内容：Lookup_array - 可能包含所要查找的值的连续单元格区域。Lookup_array 必须为数组或数组引用。
从说明可以想到，解决一个单元格的方法是
dim sn as range
Dim sn
Set sn = Range("A1").Resize(1)
MsgBox Application.WorksheetFunction.Match([a1], sn, False)

跳转到最佳答案楼层

xdragon

match在vba中的使用和工作表中有略微的差别的
参数的帮助文件内容：Lookup_array - 可能包含所要查找的值的连续单元格区域。Lookup_array 必须为数组或数组引用。
从说明可以想到，解决一个单元格的方法是
dim sn as range
Dim sn
Set sn = Range("A1").Resize(1)
MsgBox Application.WorksheetFunction.Match([a1], sn, False)