怎麼將Excel多個工作表拆分成多個單獨的Excel

例如工作薄中有多個工作表，如圖： 將一個Excel工作簿中的多個工作表(sheet)拆分成如下圖所示結果 打開需要拆分的excel，在任意工作表右擊，點擊「查看代碼」 在打開的窗口中輸入如下代碼： Private Sub 分拆工作表()        Dim sht As Worksheet        Dim MyBook As Workbook        Set MyBook = Act

>>阅读原文<<