如何在VBA中实现动态VLOOKUP？

Question

我正在尝试编写一个VBA函数，它将动态vlookup命令插入整个列（列“E”）。我的目标是从另一张表（称为“WBTS”）复制数据。不幸的是，语法似乎是非法的。 'LastRow'代表该列中最终占用的行。

For X = 2 To LastRow2
Cells(X, 5).Value = "=VLOOKUP(D"&X",WBTS!$D$2:$I$466,6,FALSE)"
Next X

Answer 1

试试这个

Cells(X, 5).formula = "=VLOOKUP(D" & X & ",WBTS!$D$2:$I$466,6,FALSE)"