2017-06-22 102 views
0

第一次海报和新的VBA。我正在尝试使用.FormulaR1C1将一个Vlookup填充到一系列单元格中,并且得到一个错误1004.我在我的宏中的其他地方几乎有这个确切的代码,它工作正常,所以我不知道什么是错的。这可能是一个简单的修复,我只是没有看到它...通过formular1c1在宏中插入vlookup

下面是代码:

Range("W2").Select 

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

欢迎SO!确保您的所有代码格式正确,以便阅读更容易。 (您的第一行关闭)提供完整的可验证示例。在这种情况下,您提供了一个包含各种参考的公式,但我不知道该数据应该是什么。我也不知道代码的其余部分是什么样的,所以很难与其他宏进行比较。 –

+0

谢谢,@CodyG。将这样做前进。看起来斯科特·克莱纳在下面回答。 (感谢YowE3K做一些初步的编辑)。 – Zdub

回答

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