開啟檔案如下：Workbooks.Open ("C:\對賬單\對帳單.xlsx")這裡你可以把“C:\對賬單\”換成你的絕對路徑，你可以用：a = ThisWorkbook.Patha = ThisWorkbook.PathWorkbooks.Open ("" & a & "&" \ "&對帳單.xlsx")來獲取你當前表的絕對路徑，然後再開啟，因為不知道你的具體情況，如果有問題可以hai我 如果當前資料夾下還有A資料夾可以用程式碼：Workbooks.Open ("" & a & "&" \ A\"&b.xlsx")Microsoft Excel是Microsoft為使用Windows和Apple Macintosh作業系統的電腦編寫的一款電子表格軟體。直觀的介面、出色的計算功能和圖表工具，再加上成功的市場營銷，使Excel成為最流行的個人計算機資料處理軟體。在1993年，作為Microsoft Office的元件釋出了5.0版之後，Excel就開始成為所適用操作平臺上的電子製表軟體的霸主。

將當前資料夾設為預設即可。

在你的語句前面加上下面兩句： ChDir ThisWorkbook.Path ChDrive ThisWorkbook.Path