使用場景： 在很多情況下，公司中收集資料可能都不是雲端收集，到最后可能給到自己是一個Excel文檔，然后里面還一堆sheet，這個時候，使用這段代碼就可以快速將工作表分別保存成不同的工作簿，方便接下來的其他處理。 使用方法也非常簡單： 將這一段代碼隨便拷貝到一個sheet中，直接點擊執行 ...

sh.Copy '這條語句會復制工作表並放在一個新建工作簿 file_name = ActiveWorkb ...

...

新建一個文件夾,新建4個工作薄,名字分別是:表1.xls,表2.xls,表3.xls,代碼.xls.然后在這個文件夾下面再新建一個文件夾名字為:移動到的文件夾.打開代碼.xls 粘貼以下代碼到代碼.xls 工作薄的VBA窗口.分別執行代碼過程Sub 復制表1()FileCopy ...

使用vba，將一個工作簿中的多個工作表拆分為多個工作簿，拆分后的工作簿以工作表名稱命名，存檔在【當前工作簿目錄】下的【拆分工作簿】目錄下面。 增加邏輯： 1、如果有隱藏工作表時，彈出輸入框，選擇是否執行及顯示當前隱藏的工作表。 補充知識點： ...

代碼邏輯如下： 說明：這里是分別復制給子工作簿/工作表的值，而沒有復制格式，如果需要特殊格式的，可以現在匯總表中進行格式設置，再執行合並動作。 運行宏代碼，選擇工作表： ...

...

來自《別怕excel vba其實很簡單》 ...