Excel宏：运行时错误1004

Question

我正在制作一个Excel宏，但是在这段代码上不断出现运行时错误1004 ：。

FormulaR1C1 = "=IFERROR(""VLOOKUP(""(Active.Workbook.Sheets(""Sheet1(CT)"").Range(""E2"")),Application.Goto Workbooks(""Cycle time list of products.xls"").Sheets(""Sheet1"").Range(""A1:C300"")"",""3"",""FALSE"")"",0)"

Answer 1

您的方法太多" ，并且未正确将公式与vba串联：

.Formula = "=IFERROR(VLOOKUP(" & ActiveWorkbook.Sheets("Sheet1(CT)").Range("E2").Address(0,0,,1) & "," & Workbooks("Cycle time list of products.xls").Sheets("Sheet1").Range("A1:C300").Address(1,1,,1) & ",3,FALSE),0)"