VBA 求和D7:D10

以下是VBA求和D7:D10的代码：

Dim sum As Double
sum = WorksheetFunction.Sum(Range("D7:D10"))

这里使用了VBA内置函数`WorksheetFunction.Sum()`来计算D7到D10单元格的和，并将结果赋值给变量`sum`。需要注意的是，这里的数据范围是通过`Range()`函数来指定的。