使用VBA计算excel单元格中的公式？

Question

我有一系列Excel格式的文件。每个excel文件中的数据量不同。我正在创建一个代码，它将循环访问一个文件夹并对所有excel文件执行计算。

我正在使用VBA下面的代码来确定的行中的Excel文件数：我使用下面的公式来对单元格范围进行计算

i = .Cells(.Rows.Count, 2).End(xlUp).Row 

：

With .Range("D2:D" & i) 
    .Formula = "=Log(B2)" 
End With 

如何计算D中下一个可用单元格中“D”列中所有值的总和？这就是公式理论上的原理

j = i + 1 
    With .Range("D" & j) 
     .Formula = "=Sum(D2:D & i)" 
    End With 

我将如何使用带有总和的D单元用于未来的计算？让我说我想要E1 "=(D2-$D$ & j)^2"

对不起模糊的标题，我不知道如何描述这个问题。

Answer 1

由于从评论跟进，这一个工程：

With .Range("D" & j) 
    .Formula = "=SUM(D2:D" & i & ")" 
End With