作者innerpeace (小寶)
看板Visual_Basic
標題[VBA ] 請益EXCEL VBA用陣列存取資料與運用
時間Thu Aug 24 18:12:24 2017
各位高手 大家好：
感謝上次熱心的前輩不吝解答
讓我可以在自學VBA的過程中
慢慢累積編寫能力
自己從網路資料不停地Try & Error決解了不少問題
但是目前遇到陣列依然苦手中 >"<
想用陣列處理以下的資料：
STEP 1 從Sheet1 B1:D102範圍抓資料
Sheet1
A B C D E F
1 x b1 c1 d1 x x
2 x b2 c2 d3 x x
3 x b3 c3 d4 x x
:
:
100 x b100 c100 d100 x x
101 x b101 c101 d101 x x
102 x b102 c102 d102 x x
STEP 2 放入Sheet2第一行的102X5=510個格子中(多留空的格子以後儲存其他運算結果)
Sheet2
A B C D E F G H I J K L M N O..... SL SM SN SO SP
1 b1 c1 d1 x x b2 c2 d2 x x b3 c3 d3 x x..... b102 c102 d102 x x
STEP 3
抓d2 d3 d4的資料取平均p1 放入D1這格(第4格)
抓d3 d4 d5的資料取平均p2 放入I1這格(第9格)
:
:
抓d100 d101 d102的資料取平均 p99放入RZ1這格(第494格)
結果示意：
Sheet2
A B C D E F G H I J K L M N O..... SL SM SN SO SP
1 b1 c1 d1 p1 x b2 c2 d2 p2 x b3 c3 d3 p3 x..... b102 c102 d102 x x
卡住的點：
1.目前我只會Step 1把資料放入陣列，但還不會處理Step 2，把資料插入間隔然後拆成橫
列？
2.STEP 3的步驟，如何依照想要的位置，取出陣列中的資料，計算後再放回陣列？
請問有高手能提供語法範例嗎？或是能給我一點提示
感激不盡!
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.164.142.41
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Visual_Basic/M.1503569547.A.165.html
1F：→ MOONRAKER: cells(row, col)一招凸歸excel 08/24 18:47
2F：→ innerpeace: 可是cells(row, col)資料多就超慢的，才想用陣列重寫 08/24 20:23
3F：→ MOONRAKER: 已經複製到陣列那就(r,c)一格一格搬成你要的樣子 08/26 01:16
4F：→ innerpeace: 我再試試，謝謝提供建議! 09/07 00:35