如何將多個csv文件組合/導入到多個工作表中？

如果要從一個文件夾中將多個csv文件作為工作簿中的單獨工作表導入，如何在Excel中處理此工作？

使用VBA代碼將多個csv文件導入到單獨的工作表中

將多個 csv 文件導入到單獨的工作表中 Kutools for Excel

將工作簿拆分為多個單獨的csv / pdf / txt / excel文件

使用VBA代碼將多個csv文件導入到單獨的工作表中

要將多個csv文件快速導入到工作簿中，以下VBA代碼可能會有所幫助，請執行以下操作：

1。 按住 ALT + F11 在Excel中打開鍵 Microsoft Visual Basic應用程序 窗口。

2。 點擊 插頁 > 模塊，然后將以下代碼粘貼到 模塊 窗口。

VBA代碼：將多個文本文件導入到單獨的工作表中：

Sub CombineCsvFiles()updateby ExtendofficeDim xFilesToOpen As VariantDim I As IntegerDim xWb As WorkbookDim xTempWb As WorkbookDim xDelimiter As StringDim xScreen As BooleanOn Error GoTo ErrHandlerxScreen = Application.ScreenUpdatingApplication.ScreenUpdating = FalsexDelimiter = "|"xFilesToOpen = Application.GetOpenFilename("Text Files (*.csv), *.csv", , "Kutools for Excel", , True)If TypeName(xFilesToOpen) = "Boolean" ThenMsgBox "No files were selected", , "Kutools for Excel"GoTo ExitHandlerEnd IfI = 1Set xTempWb = Workbooks.Open(xFilesToOpen(I))xTempWb.Sheets(1).CopySet xWb = Application.ActiveWorkbookxTempWb.Close FalseDo While I < UBound(xFilesToOpen)I = I + 1Set xTempWb = Workbooks.Open(xFilesToOpen(I))xTempWb.Sheets(1).Move , xWb.Sheets(xWb.Sheets.Count)LoopExitHandler:Application.ScreenUpdating = xScreenSet xWb = NothingSet xTempWb = NothingExit SubErrHandler:MsgBox Err.Description, , "Kutools for Excel"Resume ExitHandlerEnd SubCopy

3。 然后按 F5 鍵執行此代碼，然后會彈出一個窗口，轉到特定文件夾，然后選擇要導入到Excel的csv文件，請參見屏幕截圖：

4。 然后點擊 可選 按鈕，所選的csv文件已作為新工作簿中的單獨工作表導入。

5。 最后，您可以根據需要保存新工作簿。

將多個 csv 文件導入到單獨的工作表中 Kutools for Excel

如果你有 Kutools for Excel，其功能強大的工具-結合，您可以根據需要快速將多個csv文件組合或導入到一個工作表或多個分離的工作表中。

安裝后 Kutools for Excel，請這樣做：

1。 請點擊 Kutools 加 > 結合，請參見屏幕截圖：

2. 在 合并工作表 對話框，請選擇 將工作簿中的多個工作表合并到一個工作簿中，請參見屏幕截圖：

3。 在 第一步 向導中，單擊 地址 > 文件 選擇要合并的csv文件，請參見屏幕截圖：

4。 在彈出 可選 對話框中選擇 （* .csv） 從下拉列表中，然后指定要合并的csv文件。

5。 然后點擊 可選 按鈕，您選擇的csv文件已導入對話框，請參見屏幕截圖：

6。 在 第一步，請執行以下操作：

（1.）檢查 每個工作表的第一行（評論） 來自 插入工作表信息 部分，所有csv文件信息將作為注釋插入到合并的工作表中；

（2.）您可以根據需要重命名csv文件；

（3.）遇到空白csv文件時，可以跳過空白的csv文件。

7。 然后點擊 完成 按鈕，完成合并后，您可以為新的合并工作簿指定文件名和位置。 看截圖：

8。 然后點擊 優惠 按鈕，在彈出的promt框中，您可以打開新文件，然后單擊 是，然后點擊關閉 沒有，請參見屏幕截圖：

9。 然后您可以隨意保存此方案。 看截圖：

10。 最后，您選擇的csv文件已被導入到具有單獨工作表的新工作簿中，請參見屏幕截圖：

下載并 Kutools for Excel 現在 ！

演示：將多個 csv 文件導入到單獨的工作表中 Kutools for ExcelKutools for Excel：具有300多個方便的Excel加載項，可以在內，沒有任何限制。 立即下載并！ 將工作簿拆分為多個單獨的csv / pdf / txt / excel文件

在某些情況下，您可能希望將工作簿拆分為單獨的 csv 文件， Kutools for Excel的拆分工作簿實用程序可以快速輕松地完成這項工作。

安裝后 Kutools for Excel，請這樣做：

1。 點擊 Kutools 加 > 工作簿 > 拆分工作簿，請參見屏幕截圖：

2. 在 拆分工作簿 對話框：

（1.）檢查要拆分的工作表；

（2.）并檢查 指定保存格式，然后選擇要保存的文件格式；

（3.）然后單擊 分裂 按鈕，然后指定一個文件夾來放置分開的文件。

3。 然后點擊 OK 要開始拆分，工作簿將拆分為所需的單獨的csv文件。

下載并 Kutools for Excel 現在 ！

將工作簿拆分為多個單獨的csv / pdf / txt / excel文件Kutools for Excel：具有300多個方便的Excel加載項，可以在內，沒有任何限制。 立即下載并！

最佳辦公生產力工具

將小時轉化為分鐘 Kutools for Excel!

準備好增強您的 Excel 任務了嗎？ 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel！

為什么需要 Kutools for Excel