0
通過在R1C1格式中應用正常的excel公式來掙扎,這樣我就可以在VBA中循環公式。問題是如何使用R1C1表示法引用其他表中的列。所以在下面的公式中:混合R1C1和A1符號
ell.Offset(0, 5).FormulaR1C1 = "=IF(LEN(R[]C[-2])>0,(R[]C[-2])*VLOOKUP([R[]C[1]),Core!A:C,3,FALSE)/_
VLOOKUP(R[]C[-1],Core!A:C,3,FALSE),R[]C[4])"
如何獲得Core!A:C轉換爲R1C1格式?我知道你不能混用這兩種格式,但恐怕我不知道這個語法!任何幫助表示讚賞!
編輯:
Sub Expo_dos_Formulas()
'===============================================================================
Sheets("Data_Sheet").Activate
For Each cell In Range("G5:G500")
If cell <> "Error" Then
cell.Offset(0, 5).FormulaR1C1 = "=IF(LEN(R[]C[-2])>0,_
(R[]C[-2])*VLOOKUP([R[]C[1]),Core!RC1:RC3,3,FALSE)/VLOOKUP(R[]C[-1],_
Core!RC1:RC3,3,FALSE),R[]C[4])"
End If
Next
'===============================================================================
End Sub
感謝斯科特下面的兩個全行的相對引用,我已經插上,在然後把公式中的一個基本單元循環,但我得到「應用程序定義或對象定義的錯誤」。你能幫助爲什麼?我剛剛添加了代碼到問題 – IIJHFII
這是不同的,你原來的公式中有一個錯字,公式中有一個額外的')'。試試我剛發佈的那個。 –
此外,我在評論中給出了不好的建議,因此在答案中轉發。 –