如何把幾個檔案合在一個excel

如何把幾個檔案合在一個excel

一、新建一個檔案夾,把要合併的表格都放在這個檔案夾裏;二、開啟一個表格,點擊數據,功能欄找到獲取數據並點擊;三、選擇自文字,然後選擇從檔案夾,選擇我們新建的檔案夾點擊開啟;四、彈窗中,我們點擊組合下拉選單,選擇合併和加載;五、選擇工作表1.點擊確定,這樣多個表格內的數據就合併到一個表格內了。

小編還爲您整理了以下內容,可能對您也有幫助:

怎樣才能將多個Excel表格的內容合併到一個表格裏面?

有多種方法可以將多個Excel表格的內容合併到一個表格裏面,以下是其中兩種常見的方法:

方法一:使用Excel自帶的合併工具

1. 開啟一個新的Excel文檔,點擊“數據”選項卡,在“來自其他來源”一欄中選擇“從文字/CSV”選項;

2. 選擇要合併的第一個Excel表格,點擊“開啟”;

3. 在“文字匯入嚮導”中,選擇“分隔符”選項,並勾選“製表符”和“逗號”;

4. 點擊“下一步”,在“列數據格式”中選擇“文字”;

5. 點擊“完成”,將數據匯入到新的Excel文檔中;

6. 重複以上步驟,將其他Excel表格的數據分別匯入到新的Excel文檔中;

7. 最後,將所有數據複製到同一個工作表中即可。

方法二:使用VBA宏

1. 開啟一個新的Excel文檔;

2. 點擊“開發工具”選項卡,選擇“Visual Basic”;

3. 在Visual Basic編輯器中,點擊“插入”選項卡,選擇“模組”;

4. 將以下代碼複製到模組中:

Sub MergeAllWorkbooks()

Dim SummarySheet As Worksheet

Dim FolderPath As String

Dim NRow As Long

Dim FileName As String

Dim WorkBk As Workbook

Dim SourceRange As Range

Dim DestRange As Range

Application.ScreenUpdating = False

Set SummarySheet = ThisWorkbook.Worksheets.Add

FolderPath = InputBox("請輸入要合併的檔案夾路徑:")

If Right(FolderPath, 1) <> "\" Then FolderPath = FolderPath + "\"

FileName = Dir(FolderPath & "*.xls*")

Do While FileName <> ""

Set WorkBk = Workbooks.Open(FolderPath & FileName)

Set SourceRange = WorkBk.Worksheets(1).UsedRange

If NRow = 0 Then

Set DestRange = SummarySheet.Range("A1")

SourceRange.Copy DestRange

Else

Set DestRange = SummarySheet.Range("A" & NRow + 1)

SourceRange.Copy DestRange

End If

NRow = SummarySheet.UsedRange.Rows.Count

WorkBk.Close False

FileName = Dir()

Loop

SummarySheet.Columns.AutoFit

Application.ScreenUpdating = True

End Sub

5. 點擊“執行”按鈕,輸入要合併的Excel表格所在的檔案夾路徑;

6. 程序將自動遍歷該檔案夾下的所有Excel表格,將它們的數據合併到新的Excel文檔中;

7. 最後,儲存新的Excel文檔即可。

以上兩種方法都能夠將多個Excel表格的內容合併到一個表格裏面,使用VBA宏的方法相對來說更加自動化和快捷,但需要一定的編程知識。

如何將多個excel檔案快速合併到一個excel中呢?

操作設備:戴爾電腦

操作系統:win10

操作軟件:Excel2016

1、將需合併的Excel檔案放在同一個檔案夾中。

2、開啟新建的Excel檔案,按 Alt + F11 鍵,開啟宏,選擇視圖→代碼視窗。

3、將下面的代碼拷貝粘貼到代碼視窗中:

Sub sheets2one()

'定義對話框變量

Dim cc As FileDialog

Set cc = Application.FileDialog(msoFileDialogFilePicker)

Dim newwork As Workbook

Set newwork = Workbooks.Add

With cc

If .Show = -1 Then

Dim vrtSelectedItem As Variant

Dim i As Integer

i = 1

For Each vrtSelectedItem In .SelectedItems

Dim tempwb As Workbook

Set tempwb = Workbooks.Open(vrtSelectedItem)

tempwb.Worksheets(1).Copy Before:=newwork.Worksheets(i)

newwork.Worksheets(i).Name = VBA.Replace(tempwb.Name, ".xls", "")

tempwb.Close SaveChanges:=False

i = i + 1

Next vrtSelectedItem

End If

End With

Set cc = Nothing

End Sub

4、點擊選單“執行”—“執行子過程/用戶窗體”。

5、在彈出選擇對話框中,選擇要批量合併的Excel檔案,點擊“確定”即可合併爲一個Excel工作簿。

6、點擊“確定”後,執行合併即可。

多個Excel檔案怎樣合併成一個?

把多個相同格式的Excel表格數據快速的合併到一張表格中,可透過使用“數據連結”功能實現。

具體操作步驟如下:

1、在電腦中開啟EXCEL表格,點擊數據頁籤中的“獲取外部數據”,在彈出的選項中點擊選擇“現有連接”。

2、在彈出的對話框中,點擊左下角的瀏覽更多。

3、找到並點擊選擇需要合併的表格,然後點擊開啟。

4、在多個sheet表格中,點擊選擇需要合併的表格,然後點擊確定。

5、彈出匯入數據對話框,可使用默認設定,點擊下方的確定按鈕,重複步驟3、4即可合併多個表格數據。

6、返回EXCEL表格,發現把多個相同格式的Excel表格數據快速的合併到一張表格中操作完成。

如何將多個excel檔案的數據彙總到一個表格檔案裏?

1、首先我們開啟需要彙總的excel表格,在表格的下面,重命名一個表格,我們暫且命名爲“彙總”。然後我們點擊開啟數據中的“合併計算”選項。然後我們在彈出來的視窗中的點擊引用位置後面的圖標。

2、如果是相同格式的Excel表格,可以利用VBA快速將幾個工作表中的數據全部彙總到一個工作表中。

3、,新建一個空白的Excel檔案,點擊數據工具欄,依次選擇“新建查詢”-“從檔案”-“從檔案夾”。2,在彈出的對話框中點擊瀏覽選擇銷售數據所在的檔案夾,也可以直接在地址欄中輸入檔案夾的地址,輸入好以後點擊確定。

4、開啟EXCEL表格,創建一張彙總表格,點擊功能區“數據-合併計算”。彈出“合併計算”視窗,點擊引用位置右側的箭頭圖標,選擇需要合併的明細數據。

5、開啟excel表格,點擊選單欄的【數據】選項。在下方,找到【合併表格】選項並點擊。選擇合併方式爲【多個工作表合併成一個工作表】。之後,點擊【添加檔案】選項。選擇其他的excel表格,點擊【開啟】。