熱門Ptt文章

[爆卦]VBA UBound 用法是什麼？優點缺點精華區懶人包

為什麼這篇VBA UBound 用法鄉民發文收入到精華區：因為在VBA UBound 用法這個討論話題中，有許多相關的文章在討論，這篇最有參考價值！作者nazomegami (深呼吸~)看板Office標題[算表] VBA陣列運算問題(SUMIF)...

作者nazomegami (深呼吸~)
看板Office
標題[算表] VBA陣列運算問題(SUMIF)
時間Mon Feb 29 19:07:44 2016

軟體: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

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.39.50.197
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1456744067.A.E86.html
→ soyoso: https://i.imgur.com/QqG8aG7 改用evaluate 02/29 19:33
→ nazomegami: 謝謝你，不過剛剛嘗試了一下還是失敗了... 02/29 21:18
→ nazomegami: evaluate的運用在網路上找到都比較簡單，沒有看到 02/29 21:22
→ nazomegami: 有關join、&的用法，覺得好困惑~ 02/29 21:23
→ soyoso: https://i.imgur.com/CdwKEei 測試可置於ary(i)內 02/29 23:14
→ nazomegami: 謝謝你，不過還是失敗了，ary(i)裡面的值顯示為"錯誤 03/01 11:53
→ nazomegami: 2015" 03/01 11:53
→ nazomegami: 不知道是不是因為版本別的原因? 03/01 11:53
→ nazomegami: 我是指我vba的版本別 03/01 11:54
→ soyoso: https://goo.gl/LgTRuh 測試檔案，於2010或2016執行上無 03/01 11:59
→ soyoso: 出現錯誤 03/01 12:00
→ nazomegami: 是我變數設定的問題，已除錯，謝謝你! 03/01 19:41

你可能也想看看

搜尋相關網站