为什么 .Sum("B2:F2") 会生成“无法获取 WorksheetFunction 类的属性”错误？

Question

即使我尝试对一行值求和。我试过了，worksheetfunction.mmult但我得到了同样的错误。我是否需要添加更多对 Excel 的引用？

Sub GetObj()
Dim Obj As Double
Dim VB1, VB2, AESum As Double
Dim range1, range2, cell1, cell2 As Range

With Worksheets("Result")
    AESum = Application.WorksheetFunction.Sum("B2:F2")
End With

End Sub

Answer 1

它本身"B2:F2"只是一个字符串。如果要将其用作范围，则必须特别指定。

改变

AESum = Application.WorksheetFunction.Sum("B2:F2")

到

AESum = Application.WorksheetFunction.Sum(.Range("B2:F2"))