標題: [發問] 如何依照清單順序開檔後編輯檔案 [打印本頁]

---

作者: linlin00    時間: 2015-10-19 01:15     標題: 如何依照清單順序開檔後編輯檔案

各位先進好，
我有一組清單是存在A的位置上，目前我已知道要如何使用VBA依序開啟檔案，
但我希望開啟檔案後能在開啟的這個檔案上執行另一個VBA程式(比如計算總和)，
之後將結果回傳回原始清單的資料，這個部分不清楚如何操作。
麻煩各位前輩幫忙，謝謝。

[attach]22213[/attach]

---

作者: lpk187    時間: 2015-10-19 18:45

回復 1# linlin00


    Workbooks.Open要完整的路徑和檔名，但 Workbooks("活頁簿名稱")?不用路徑，?只要檔名就可以
如下程式解釋：

1.     For i = 1 To 2
   
2.         fpath = ThisWorkbook.ActiveSheet.Cells(i, 1) '路徑 "C:\Documents and Settings\Administrator\My Documents\"
   
3.         ffile = ThisWorkbook.ActiveSheet.Cells(i, 2) '檔名 "vbatest2.xls"
   
4.         Workbooks.Open (fpath & ffile)
   
5.         Workbooks("ffile").Sheets ("工作表1")...
   
6.         ...
   
7.         ...其內容自行填補
   
8.         ...
   
9.         ...
   
10.         Workbooks("ffile").Close True
    
11.     Next

複製代碼

---

作者: linlin00    時間: 2015-10-20 13:17

回復 2# lpk187
感謝回復!
我先操作試試看

---

作者: linlin00    時間: 2015-10-20 15:30

回復 2# lpk187
非常感謝，我弄懂了!

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)