在Excel中因為錄入的數據都在一個工作簿，如果需要拆分的話需要一定的技巧，相信有很多朋友都不知道該如何拆分一個工作簿多個表格。接下來是學習啦小編為大家帶來的excel2007 拆分一個工作簿多個表格的方法，供大家參考。

　　excel2007 拆分一個工作簿多個表格的方法

　　拆分工作簿多表格步驟1：打開需要編輯的Excel文檔。如圖所示，工作簿下方有很多工作表?，F在需要將這些工作表單獨拆分開成一個個工作簿。

excel2007 拆分一個工作簿多個表格的方法圖1

　　拆分工作簿多表格步驟2：右鍵任意一個工作表標簽，在彈出的下拉列表中選擇查看代碼。即彈出代碼窗口。如下圖所示。

excel2007 拆分一個工作簿多個表格的方法圖2

excel2007 拆分一個工作簿多個表格的方法圖3

　　拆分工作簿多表格步驟3：點擊菜單插入-模塊 在彈出的模塊對話框中 輸入以下代碼：

　　Private Sub 分拆工作表()

　　Dim sht As Worksheet

　　Dim MyBook As Workbook

　　Set MyBook = ActiveWorkbook

　　For Each sht In MyBook.Sheets

　　sht.Copy

　　ActiveWorkbook.SaveAs Filename:=MyBook.Path & "/" & sht.Name, FileFormat:=xlNormal '將工作簿另存為EXCEL默認格式

　　ActiveWorkbook.Close

　　Next

　　MsgBox "文件已經被分拆完畢!"

　　End Sub

excel2007 拆分一個工作簿多個表格的方法圖4

excel2007 拆分一個工作簿多個表格的方法圖5

　　拆分工作簿多表格步驟4：單擊運行-運行子過程|窗體 幾秒過后 彈出提示窗口“文件已被拆分完畢” 如下圖所示

excel2007 拆分一個工作簿多個表格的方法圖6

　　拆分工作簿多表格步驟5：返回Excel工作簿文件所在路徑 查看 如下圖所示 原先工作簿中的工作表已經成為單獨的工作簿了!不信 可以對照查看圖中的修改日期

excel2007 拆分一個工作簿多個表格的方法圖7