2017-06-22 101 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