返回列表 上一主題 發帖

[發問] 如何指定開啟的Workbook?

[發問] 如何指定開啟的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
請大大幫忙解惑
謝謝

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


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

TOP

回復 2# stillfish00

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

TOP

        靜思自在 : 每天無所事事,是人生的消費者,積極、有用才是人生的創造者。
返回列表 上一主題