excel - 自动求和单元格 VBA Excel

Question

我正在尝试使用 VBA 对 Excel 中的单元格 block 内的值进行自动求和。我在调试以下代码时不断收到类型不匹配错误。我哪里出错了？

Sub autosumtest()
    Dim total As Integer
    Worksheets("Sheet1Test").Select
    Range("F16:G20").Select
    total = CInt("=SUM(Selection.Values)")
    MsgBox (total)
End Sub

编辑1:这是我的测试数据的简单示例，称为自动求和范围:

Answer 1

您可以使用 [] 来计算任何电子表格表达式。

Sub autosumtest()
   Dim total As Integer
   total = CInt([=sum(sheet1Test!F16:G20)])
   MsgBox (total)
End Sub