我有下面的代码片段,我希望用它来和可变长度的行。
Dim LR As Long
LR = ActiveSheet.Range("Total").Row
With Worksheets("Post Implementation Costs")
    .Range("AD" & LR).Formula = "=Sum("AD7:AD"& LR - 1)"
End With其中LR = 15,我希望结果是=SUM(AD:AD14),但是目前它返回=Sum(AD7: & LR -1)
发布于 2017-03-28 07:38:55
您有一些"放置问题,请将现有的Formula行更改为:
.Range("AD" & LR).Formula = "=Sum(AD7:AD" & LR - 1 & ")"发布于 2017-03-28 08:16:12
如果您希望完全避免引用问题,可以使用R1C1表示法,并将行写为:
.Range("AD" & LR).FormulaR1C1 = "=Sum(R7C:R[-1]C)"R7表示第7行,R[-1]表示当前行之前的行,C表示当前列。
https://stackoverflow.com/questions/43063325
复制相似问题