答：Sum函数可以在工作表中求，同样也可以对VBA数组求和，如：

                    
                      Sub t2()
                          arr = Array(1, 35, 4, 13)
                          MsgBox Application.Sum(arr)  '对数组进行求和
                      End Sub

                2、Count和Counta

                     Count和Counta可以统计数组中数字的个数和数字+文本的个数。

                    Sub t3()
                         arr = Array(1, 35, "a", 4, 13, "b")
                         MsgBox Application.Count(arr)  '返回数字的个数4
                         MsgBox Application.CountA(arr)  ‘返回数组文本和数字的总个数
                    End Sub