Board logo

標題: [發問] 如何指定開啟的Workbook? [打印本頁]

作者: acdx    時間: 2013-7-9 18:05     標題: 如何指定開啟的Workbook?

程式執行前須開啟特定檔案(Analysis.xlsx)再從表單選擇要計算(開啟)的檔案
所以在城市執行過程會有兩個.xlsx檔案開啟,一個是固定檔名(Analysis.xlsx -A檔案)另一個是不定檔名(B檔案)會隨使用者開啟的當案而有所不同
如何讓指定程式現在是要抓取A檔案或B檔案?
我目前的作法是以開啟的順序判別:
Workbooks(2):A檔案     因為有個人活頁簿personal.xls存有巨集
Workbooks(3):B檔案
--------------------------------------------------------------------
因為我的程式是轉存成增益集以便於在不同電腦裡使用
當所使用的電腦裡個人活頁簿personal.xls沒有存巨集則順序會變成
Workbooks(1):A檔案
Workbooks(2):B檔案
所以我將它改成
Set xfile = Workbooks("Analysis")   'Workbooks(2)
但對於B檔案則不知該如何命名為yfile
請大大幫忙解惑
謝謝
作者: stillfish00    時間: 2013-7-9 21:03

回復 1# acdx
在城市執行過程會有兩個.xlsx檔案開啟,一個是固定檔名(Analysis.xlsx -A檔案)另一個是不定檔名(B檔案)會隨使用者開啟的當案而有所不同


    B檔案是用Workbooks.open開啟的吧,你可以在前面開啟B檔案的那時候就去參照它了。
    Dim yfile as WorkBook
    Set yfile = Workbooks.open("B檔案路徑")
作者: acdx    時間: 2013-7-10 10:20

回復 2# stillfish00

謝謝!
我將它改成:
Set yfile = Workbooks.Open(TextBox1.Value) (因為檔案路徑由Userform所載入TextBox1)
可成功執行




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