SUM 变量值到 R1C1 公式

Question

我想将变量值求和到 RC 公式，我尝试了以下操作：

X = "=SUM(RC[{-24 +" & variable & "}]:RC[-1])" 

Answer 1

使列计算独立于公式，然后将其连接回去。对 xlA1 和 xlR1C1 语法使用 application.evaluate。

Dim f as string, x As double, var as integer
for var = 1 to 9
    f = "=SUM(RC[" & -24 + var  & "]:RC[-1])"
    Debug.Print f
    x = Application.Evaluate("SUM(RC[" & -24 + var  & "]:RC[-1])")
    Debug.Print x
next var