在单元格中插入VLOOKUP公式

我试图在单元格中插入一个VLOOKUP公式。 我甚至不试图替代参数。 我使用这个代码：

myCell.Offset(0, 4).Value = "=VLOOKUP(A2;AnotherWorksheet!$A$1:$B$231;2;FALSE)" 

而我收到一个错误：1004

如果我把这个精确的公式粘贴到一个单元格中，那么这个公式就被识别并接受了…任何提示？ 谢谢！

Answer 1

首先，使用,而不是; 分离参数时。 其次，您正在寻找.Formula属性，而不是.Value 。 .FormulaR1C1可能正常工作，但为了准确，只需使用A1型风格的公式编写VLOOKUP 。 见下文。

码：

 Sub Voom() Range("A1").FormulaR1C1 = "=VLOOKUP(A2,""AnotherWorksheet!$A$1:$B$231"",2,FALSE)" End Sub 

结果：

它显示#N/A因为当然，我没有可用的数据。 🙂

为了确切的代码，只需使用：

 myCell.Offset(0, 4).Formula = "=VLOOKUP(A2,""AnotherWorksheet!$A$1:$B$231"",2,FALSE)" 

希望这可以帮助。

Answer 2

您需要使用Formula属性。

例如：

 myCell.Offset(0, 4).Formula = "=VLOOKUP(A2,""AnotherWorksheet!$A$1:$B$231"",2,FALSE)" 

从MSDN， Formula属性和FormulaR1C1属性文档。