一鍵合體,將多個Excel文件合併為一個文件

  工作中

經常需將幾個Excel文件中的工作表

合併到一個Excel文件中

效果如下

一鍵合體,將多個Excel文件合併為一個文件

●●●

小竅門:將螢幕橫放可放大圖片!

新建合併工作簿的宏命令

▎1 「宏」在哪裡?

■單擊工具欄上的「開發工具」標籤

■點擊「宏」

如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

▎2 給「宏」起名字

表格中出現「宏」對話框

■「宏名」下方輸入框內輸入宏名字:hebing

■點擊「創建」

如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

▎3 在VBA編輯窗口編輯代碼

Excel將調出VBA窗口

■在編輯窗口可以看到如下代碼

Sub hebing()

End Sub

這段代碼是系統根據宏名「hebing」自動生成。

如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

■在編輯窗口輸入如下代碼

Sub hebing()

Dim FileOpen

Dim X As Integer

Application.ScreenUpdating = False

FileOpen = Application.GetOpenFilename(FileFilter:=’Microsoft Excel(*.xls;*.xlsx),*.xls;*.xlsx’, MultiSelect:=True, Title:=’hebing’)

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: MsgBoxErr.Description

End Sub

如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

VBA代碼編輯完成後關閉VBA窗口,至此合併工作簿的宏創建完畢。

▎4 查看剛剛創建的宏「hebing」

■單擊工具欄上的「開發工具」標籤

■點擊「宏」,可以從「宏」對話框中看到「hebing」宏

如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

為新建的「hebing」宏指定一個按鈕

▎5 如何新建按鈕

■單擊工具欄上的「開發工具」標籤

■點擊「插入」

■從下拉菜單中選擇「按鈕(窗體控件)」。如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

■在工作表中點擊需創建按鈕的位置,按住滑鼠並拖動滑鼠改變按鈕大小

■鬆開滑鼠時,會彈出「指定宏」對話框

■選擇剛剛新建的「hebing」宏,點擊「確定」

如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

■ 「按鈕1」就是新建的「hebing」宏指定的按鈕,如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

▎6 修改按鈕的名字

■在按鈕上單擊滑鼠右鍵

■從彈出的菜單中選擇「編輯文字」,如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

■將按鈕名字「按鈕1」改為「合併」,如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

測試「合併」按鈕

▎7 使用「合併」按鈕合併工作簿

■點擊「合併」按鈕,如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

Excel彈出「hebing」對話框

■選定1月和2月行銷快報

■點擊「打開」,如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

1月、2月行銷快報工作簿已經合併至一張工作簿中,如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

▎8 使用「合併」按鈕繼續合併其他工作簿

■點擊「合併」按鈕,如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

Excel彈出「hebing」對話框

■選定3月行銷快報

■點擊「打開」,如下圖所示。

一鍵合體,將多個Excel文件合併為一個文件

●●●

3月行銷快報工作簿已經添加合併至工作簿中,如下圖所示,工作簿中包含1月、2月、3月行銷快報。

一鍵合體,將多個Excel文件合併為一個文件

●●●

▎9 獲取文件

需要「一鍵合併工作簿」Excel文件的朋友,可以:

■給我留言,並留下您的電子郵箱地址。

■或者在公眾號主頁面發送「下載」,獲取下載鏈接及密碼!

溫馨提示:運行「宏」時,應開啟「宏」。

更多文章

Excel瘦身秘籍!

Excel強大的翻譯功能,不用太可惜了!

Excel做統計分析,這兩個方法必須會!

常用Excel快捷鍵,工作必備技巧

一鍵合體,將多個Excel文件合併為一個文件

PS:您也可以留言給我,我會及時給您答復!