[VBA ] 跨活頁簿抓資料

作者atelierz21 (HOXTON)

看板Visual_Basic

標題[VBA ] 跨活頁簿抓資料

時間Thu Jul 19 17:11:50 2018

各位大神安安，小弟手邊有兩個excel檔案。A檔的每個工作表的固定某列要從和B檔同一表的不同列抓資料。例如A檔表1的A1到C1等於B檔表1的A1到C1，A檔表2的A1到C1等於B檔表1的A2到C2，以此類推版本是office2010 感謝指教 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 223.137.82.163 ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1531991512.A.FF0.html ※ 編輯: atelierz21 (223.137.82.163), 07/19/2018 17:12:31 ※ 編輯: atelierz21 (223.137.82.163), 07/19/2018 17:13:03

推 shen001: 簡單寫一下，07/19 20:16

→ shen001: For i=1 to n07/19 20:16

→ shen001: Workbook("B").sheets(1).Range(Workbook("B").sheets(i)07/19 20:16

→ shen001: .cells(i,"A"),Workbook("B").sheets(i).cells(i,"C"))=W07/19 20:16

→ shen001: orkbook("A").sheets(i).Range("A:C1")07/19 20:16

→ shen001: Next i07/19 20:16

在跑的時候出現沒有定義sub或function 請問是workbook要再額外定義嗎？ ※ 編輯: atelierz21 (223.137.82.163), 07/19/2018 21:05:24

→ MOONRAKER: 整包用sub abc...end sub包起來吧07/19 21:09

有包起來是workbook被反白起來 ※ 編輯: atelierz21 (223.137.82.163), 07/19/2018 21:26:18

→ shen001: http://i.imgur.com/4bMxCg1.jpg07/20 09:28

問題已解決非常感謝各路大大 ※ 編輯: atelierz21 (223.137.58.14), 07/20/2018 17:22:14