通过formular1c1在宏中插入vlookup

时间:2017-06-22 19:41:28

标签: excel vba excel-vba

我试图使用.FormulaR1C1将Vlookup填充到一系列单元格中并得到错误1004.我的宏中其他地方几乎都有这个确切的代码并且它工作正常所以我不确定是什么& #39;错了。这可能是一个简单的修复,我只是没有看到它......

以下是代码:

Range("W2").Select

Range(Selection, Selection.End(xlDown)).FormulaR1C1 = "=VLOOKUP(RC[-2],$AA$2:$AC$35,3,TRUE)"

1 个答案:

答案 0 :(得分:2)

如果您打算使用R1C1,则所有引用必须采用该格式。

Range(Range("W2"), Range("W2").End(xlDown)).FormulaR1C1 = "=VLOOKUP(RC[-2],R2C27:R35C29,3,TRUE)"

但是您应该始终将工作表的父级应用于每个范围对象:

With Worksheets("Sheet1") 'Change to your sheet
    .Range(.Range("W2"), .Range("W2").End(xlDown)).FormulaR1C1 = "=VLOOKUP(RC[-2],R2C27:R35C29,3,TRUE)"
End With