excel2007合并工作薄的方法
excel2007合并工作薄的方法
Excel中經常需要使用到合并工作簿的功能，工作簿具體該如何合并呢?下面是由學習啦小編分享的excel2007合并工作薄的方法，以供大家閱讀和學習。
excel2007合并工作薄的方法：
合并工作簿步驟1：首先把需要合并的excel工作薄整理到一個文件夾中，如圖，用來合并到一起的工作薄的名字要注意，這里取名叫“合并工作薄”。
合并工作簿步驟2：打開這個excel表，直接按鍵ALT+F11，進入下圖界面。雙擊如圖所示位置的sheet1。
合并工作簿步驟3：如圖，打開準備好的VBA代碼，復制到這個空白的代碼編譯處，代碼如下：
Sub 工作薄間工作表合并()
Dim FileOpen
Dim X As Integer
Application.ScreenUpdating = False
FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xls),*.xls", MultiSelect:=True, Title:="合并工作薄")
X = 1
While X <= UBound(FileOpen)
Workbooks.Open Filename:=FileOpen(X)
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
X = X + 1
Wend
ExitHandler:
Application.ScreenUpdating = True
Exit Sub
errhadler:
MsgBox Err.Description
End Sub
合并工作簿步驟4：小說一下注意事項，如圖，注意工作薄的名字，同時，注意代碼中設定的excel版本，再一個就是為了防止上一步驟中經驗發布后代碼出錯。
合并工作簿步驟5：回到“合并工作薄”的excel表格中，如圖，點擊工具(沒有的到excel的選項中添加)，選擇宏。
合并工作簿步驟6：選擇宏以后會出現下圖界面，直接雙擊圖中選項。
合并工作簿步驟7：雙擊后彈出選擇待合并的文件夾中工作薄，直接全選要合并的工作薄即可。
合并工作簿步驟8：如圖，這就是合并后的效果，這兩個工作薄是小編下載的2014年的高考錄取分數線的內容，效果不錯，而且合并工作薄本身的工作表是不會被占用的，是新建的工作表。