Question

VB 引用另一工作薄的数据出错

引用另一个工作薄的数据：
xlApp.Range("H3") = "=VLOOKUP(B3,'" & App.Path & "\[" & filenames & "]物料'!$C:$L,10,0)" ''出错
xlApp.Range("H3") = "= App.Path & "\[" & filenames & "]物料'!B3" ''这句又可以

用上VLOOKUP就会出错，如果直接等于数据薄的某一个单元格又能引用，不知哪出错了
注：需要引用的数据薄没有打开
错误提示如下：
应用程序定义或对象定义错误 1004

Answer 1

100 VB 引用另一工作

Answer 2

不是很懂VB，但是，你前面
Set xlsApp = GetObject("E:\多组数据9个数.xlsx")，不是说
xlsApp = workbooks("多组数据9个数.xlsx")了
然后 .WorkSheets.cells(1, 1)中的worksheets是一个工作表组，你没有指定是哪一个工作表呀，它怎么运行？
试试在L = xlsApp.worksheets("sheet1").cells(1,1)
L = xlsApp.worksheets(1).cells(1,1)
其中，sheet1 要替换成 多组数据9个数.xlsx 中 工作表的真正名称
或用FOR EACH NEXT