如何依照清單順序開檔後編輯檔案 - Excel程式區

[發問] 如何依照清單順序開檔後編輯檔案

2016猴年全勤獎章 2015羊年全勤獎章熱烈參與勳章

1^# 跳轉到 »

發表於 2015-10-19 18:45 | 顯示全部帖子

回復 1# linlin00

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

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

複製代碼

靜思自在 : 君子如水，隨方就圓，無處不自在。