Question

我正在尝试使用VBA添加vlookup公式，但是，它对我不起作用。它引用另一个工作簿，工作簿的名称保存在名为FileName1的变量中。以下是我写的代码。有人可以帮忙吗？

WbkT3.Worksheets("Finance").Range("G2") = "=VLOOKUP(C2,[" & FileName1 & "]Divisor!$A:$F,3,FALSE)"

Answer 1

vlookup公式不是100％正确。范围应该是指$ B $ 3：$ C $ 5。添加缺少的行引用，公式应该有效。

excel如何解释文件名是问题的最可能原因。

试试这个。从公式替换单引号中删除方括号。如果可能，将teh方括号添加到文件名变量。以下代码经过测试并有效。

Dim FileName1 As String
FileName1 = "C:\temp\[Book2.xlsx]"

ActiveWorkbook.Worksheets("Sheet1").Range("G2")  = "=VLOOKUP(C2,'" & FileName1 & "Sheet1'!$B$3:$C$5,2,FALSE)"

VBA vlookup公式引用另一个打开的工作簿

1 个答案: