使用VBA代碼一鍵分離另存excel文件中的sheet子表

使用VBA代碼一鍵分離另存excel文件中的sheet子表 打開VB，增加模塊，輸入以下代碼： Sub SaveSeparately() Dim sht As Worksheet Application.ScreenUpdating = False ipath = ThisWorkbook.Path & 「」 For Each sht In Sheets sht.Copy ActiveWorkbo

>>阅读原文<<