PTT數位生活區 / Visual_Basic

[VBA ] 新手詢問 跨活頁簿抓資料

看板Visual_Basic作者 (HOXTON)時間6年前 (2018/07/19 17:11), 6年前編輯推噓1(1推 0噓 7→)
留言8則, 2人參與, 6年前最新討論串1/1
各位大神安安，小弟手邊有兩個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
推
07/19 20:16, 6年前 , 1F
簡單寫一下，
07/19 20:16, 1F
→
07/19 20:16, 6年前 , 2F
For i=1 to n
07/19 20:16, 2F
→
07/19 20:16, 6年前 , 3F
Workbook("B").sheets(1).Range(Workbook("B").sheets(i)
07/19 20:16, 3F
→
07/19 20:16, 6年前 , 4F
.cells(i,"A"),Workbook("B").sheets(i).cells(i,"C"))=W
07/19 20:16, 4F
→
07/19 20:16, 6年前 , 5F
orkbook("A").sheets(i).Range("A:C1")
07/19 20:16, 5F
→
07/19 20:16, 6年前 , 6F
Next i
07/19 20:16, 6F
在跑的時候出現沒有定義sub或function 請問是workbook要再額外定義嗎？ ※ 編輯: atelierz21 (223.137.82.163), 07/19/2018 21:05:24
→
07/19 21:09, 6年前 , 7F
整包用sub abc...end sub包起來吧
07/19 21:09, 7F
有包起來 是workbook被反白起來 ※ 編輯: atelierz21 (223.137.82.163), 07/19/2018 21:26:18
→
07/20 09:28, 6年前 , 8F
07/20 09:28, 8F
問題已解決 非常感謝各路大大 ※ 編輯: atelierz21 (223.137.58.14), 07/20/2018 17:22:14
‣ 更多 atelierz21 的文章
文章代碼(AID): #1RK5NO_m (Visual_Basic)
Visual_Basic 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 atelierz21 的文章
文章代碼(AID): #1RK5NO_m (Visual_Basic)