软件:EXCEL VBA
版本:2010
请教各位大大，下面程式中我想要计算不同的sumif值并存入ary(i)阵列中，
但出现"错误424，此处需要物件"的讯息，请问我是哪里需要修正呢? 谢谢。
Sub test()
Dim a, b
Dim d
Dim ary(50)
a = Array("A", "B", "A", "B", "B", "C", "B", "C", "D", "B")
b = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
d = UBound(a)
For i = 0 To d
ary(i) =Application.WorksheetFunction.SumIf(a,a(i),b)
Next
End Sub