SUM公式VBA
我正在试图计算vba中改变的单元格范围的总和。 不幸的是,单元格的值是variables。 我似乎无法得到下面的公式工作。
Private Sub calcOverheadRate(startCell As Integer, endCell As Integer) Total = endCell + 1 Range("D" & Total).Formula = "=SUM("D" & startCell & ":" & "D" & endCell)" End Sub
我得到编译错误:“预期:语句结束
为了解决这个问题,我改变了function,
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)
….
任何想法如何解决这个将不胜感激。
引号是问题:
Range("D" & Total).Formula = "=SUM(" & startCell & ":" & endCell & ")"
我已经找出了&需要在string文本的引号内的问题
Range("D" & Total).Formula = "=SUM(" & start & ":" & endC & ")"