VBA 单元格内的公式

VBA formula inside cell

我需要将这个公式放在列子集范围内

=VLOOKUP(SUBSTITUTE(M3;"#";"");$AG3:$AK1;5;FALSE)

我写了这段代码:

XML.Range("V3:V411").Formula = "=VLookup(Substitute(M3, ""#"", """"), $AG3:$AK1, 5, False)"".Value = .Value"

但不起作用,我收到 "Select method of range class failed" 错误

推荐使用R1C1格式,在宏中更稳定

另外,用宏录制器就好了

不要将 .Value 传递给 Excel,它不知道这意味着什么。那是什么计划?

.FormulaR1C1 = "=VLOOKUP(SUBSTITUTE(R[2]C[12],""#"",""""),R413C33:R821C37,5,FALSE)"

或者用.Formula:

.Formula = "=VLOOKUP(SUBSTITUTE(M3,""#"",""""),$AG3:$AK1,5,FALSE)"