SUM式VBA(SUM formula VBA)

2019-09-28 07:36发布

我试图改变计算单元格范围在VBA的总和。 不幸的是,单元格的值是变量。 我似乎无法得到下面的公式来工作。

Private Sub calcOverheadRate(startCell As Integer, endCell As Integer)
     Total = endCell + 1
     Range("D" & Total).Formula = "=SUM("D" & startCell & ":" & "D" & endCell)"
End Sub

我得到的编译错误:“预期:语句结束

为了解决这个问题,我改变了功能,

Private Sub calcOverheadRate(startCell As Integer, endCell As Integer)

    Dim start As String
    Dim endC As String

    start = "D" & CStr(startCell)
    endC = "D" & CStr(endCell)

    Total = endCell + 1

    Range("D" & Total).Formula = "=SUM(start:endC)"

End Sub

该函数编译罚款,当我运行它,在单元格的值是“#NAME”它引用SUM(start:endC)SUM(D5:D23) ....

关于如何解决这个任何想法,将不胜感激。

Answer 1:

该报价是问题:
Range("D" & Total).Formula = "=SUM(" & startCell & ":" & endCell & ")"



Answer 2:

我已经想通了:需要是报价字符串文字里面的问题

Range("D" & Total).Formula = "=SUM(" & start & ":" & endC & ")"


Answer 3:

怎么样,你试试用桌子吗?

下面是关于如何使一个表Excel中的一个1分钟的视频:

http://www.screenr.com/VvZ8



文章来源: SUM formula VBA