VBA中match函数如果前两个参数必须是同一个book吗

武易文

  在VBA编译中match函数的前两个参数分别来自两个不同的workbook，结果一直报错，说是应用程序定义或对象定义错误，求大神解释，这个如何解决

看见星光

要么两个工作簿都打开，要么把数据读入变量后再去运算。另外，MATCH的第二参数只能是单行或单列。

武易文

我就是读入变量以后它一直报错，你那边不报错吗

武易文

看见星光 发表于 2018-6-23 19:50
要么两个工作簿都打开，要么把数据读入变量后再去运算。另外，MATCH的第二参数只能是单行或单列。

i = ActiveSheet.Cells(r, 2).Value
hhh = Workbooks("数据").Worksheets("Sheet1").Columns("b")
f = WorksheetFunction.Match(i, hhh, 0)
还有一个问题
If Workbooks("数据").Worksheets("Sheet1").Cells(t, 2).Value = CStr(i) Then
    MsgBox i
End If
这两个都不能运行，求大神指教

jiminyanyan

武易文 发表于 2018-6-24 09:47
i = ActiveSheet.Cells(r, 2).Value
hhh = Workbooks("数据").Worksheets("Sheet1").Columns("b")
f =  ...

上附件。。。。。。

看见星光

武易文 发表于 2018-6-24 09:47
i = ActiveSheet.Cells(r, 2).Value
hhh = Workbooks("数据").Worksheets("Sheet1").Columns("b")
f =  ...

工作簿要打开，才能读导数据，再赋值变量。

ivccav

既然已经用VBA了，何必还在使用速度慢、又不方便的工作表函数？

取代match函数的方式不会低于5种，又不是不可取的的功能。

武易文

ivccav 发表于 2018-6-24 19:07
既然已经用VBA了，何必还在使用速度慢、又不方便的工作表函数？

取代match函数的方式不会低于5种，又不 ...

求赐教，新手

武易文

看见星光 发表于 2018-6-24 18:11
工作簿要打开，才能读导数据，再赋值变量。

我用的时候工作簿确实是处于打开状态的