開心生活站

位置:首頁 > 綜合知識 > 

如何把幾個文件合在一個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表格,點擊【打開】。

標籤:文件 excel