作者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://webptt.com/m.aspx?n=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
1F：推 shen001: 簡單寫一下，07/19 20:16
2F：→ shen001: For i=1 to n07/19 20:16
3F：→ shen001: Workbook("B").sheets(1).Range(Workbook("B").sheets(i)07/19 20:16
4F：→ shen001: .cells(i,"A"),Workbook("B").sheets(i).cells(i,"C"))=W07/19 20:16
5F：→ shen001: orkbook("A").sheets(i).Range("A:C1")07/19 20:16
6F：→ shen001: Next i07/19 20:16
在跑的時候出現沒有定義sub或function 請問是workbook要再額外定義嗎？
※ 編輯: atelierz21 (223.137.82.163), 07/19/2018 21:05:24
7F：→ MOONRAKER: 整包用sub abc...end sub包起來吧07/19 21:09
有包起來 是workbook被反白起來
※ 編輯: atelierz21 (223.137.82.163), 07/19/2018 21:26:18
問題已解決 非常感謝各路大大
※ 編輯: atelierz21 (223.137.58.14), 07/20/2018 17:22:14