SUMvariables值为R1C1公式

我想总结一个RC公式的variables值，我试着以下：

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

Answer 1

使列计算独立于公式，然后重新连接。使用application.evaluate同时使用xlA1和xlR1C1语法。

 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