如何在Excel中保存，導出多個/所有工作表到單獨的csv或文本文件？

使用 Excel 時，您可以使用另存為功能將工作表手動保存為 csv 或文本文件。 但是，要將工作簿中的多個或所有工作表轉換為單獨的 csv 或文本文件，您該怎麼做？ 在本文中，我們將向您展示將多個或所有工作表保存或轉換為單獨的 csv 或文本文件的方法。

使用VBA代碼將所有工作表保存，導出或轉換為csv或文本文件
使用Kutools for Excel將多個/所有工作表保存，導出或轉換為csv或文本文件

使用VBA代碼將所有工作表保存，導出或轉換為csv或文本文件

使用下面的VBA代碼，您可以將工作簿中的所有工作表保存到單獨的csv或文本文件中。 請執行以下操作。

將所有工作表導出或轉換為CSV文件

1。 按 其他 + F11 同時打開 Microsoft Visual Basic應用程序 窗口。

2。 在裡面 Microsoft Visual Basic應用程序 窗口中，單擊 插入 > 模塊。 然後將以下代碼複製並粘貼到 模塊 窗口。

VBA代碼：將所有工作表導出到單獨的csv文件

Sub ExportSheetsToCSV()
	Dim xWs As Worksheet
	Dim xcsvFile As String
	For Each xWs In Application.ActiveWorkbook.Worksheets
		xWs.Copy
		xcsvFile = CurDir & "\" & xWs.Name & ".csv"
		Application.ActiveWorkbook.SaveAs Filename: = xcsvFile, _
		FileFormat: = xlCSV, CreateBackup: = False
		Application.ActiveWorkbook.Saved = True
		Application.ActiveWorkbook.Close
	Next
End Sub

3。 按 F5 鍵來運行代碼。 您會看到所有導出的csv文件都位於 文件 夾。 看截圖：

將所有工作表導出或轉換為文本文件

以下代碼可以幫助您將工作簿中的所有工作表導出或轉換為單獨的文本文件。

VBA代碼：將所有工作表導出到單獨的文本文件

Sub ExportSheetsToText()
	Dim xWs As Worksheet
	Dim xTextFile As String
	For Each xWs In Application.ActiveWorkbook.Worksheets
		xWs.Copy
		xTextFile = CurDir & "\" & xWs.Name & ".txt"
		Application.ActiveWorkbook.SaveAs Filename: = xTextFile, FileFormat: = xlText
		Application.ActiveWorkbook.Saved = True
		Application.ActiveWorkbook.Close
	Next
End Sub

導出的文本文件也位於 文件 夾。 看截圖：

使用Kutools for Excel將多個/所有工作表保存，導出或轉換為csv或文本文件

Y您可以使用以下命令在Excel中快速將多個或所有工作表導出或轉換為單獨的CSV文件，文本文件或xls文件格式。 拆分工作簿 的效用 Excel的Kutools.

1。 點擊 Kutools 加 > 工作簿 > 拆分工作簿。 看截圖：

2。 在裡面 拆分工作簿 對話框：

• 1）。 如果要將所有工作表都轉換為csv或文本文件，只需選中所有工作表名稱 工作表名稱 框; 如果您只想轉換多個工作表，請繼續檢查它們，然後取消選中您不想轉換的其他工作表。
• 2）。 在裡面 選項 部分，檢查 保存類型 框，然後選擇 Unicode文本（* .txt） or CSV（Macintosh）（*。csv） 從下拉列表中選擇。
• 3）。 點擊 分裂 按鈕。

3。 在裡面 瀏覽文件夾 對話框中，指定一個文件夾來保存導出的文件，然後單擊 OK 按鈕。

現在，所有工作表或指定的工作表都將轉換為單獨的csv或文本文件，並按照上面的指定位於文件夾中。

使用Kutools for Excel將多個/所有工作表保存，導出或轉換為csv或文本文件

---

最佳辦公效率工具

Kutools for Excel 解決了你的大部分問題，並將你的生產力提高了 80%

• 重用: 快速插入 複雜的公式，圖表 以及您以前使用過的任何東西； 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
• 超級公式欄 （輕鬆編輯多行文本和公式）； 閱讀版式 （輕鬆讀取和編輯大量單元格）； 粘貼到過濾範圍...
• 合併單元格/行/列 不會丟失數據； 拆分單元格內容； 合併重複的行/列...防止細胞重複； 比較範圍...
• 選擇重複或唯一 行; 選擇空白行 （所有單元格都是空的）； 超級查找和模糊查找 在許多工作簿中； 隨機選擇...
• 確切的副本 多個單元格，無需更改公式參考； 自動創建參考 到多張紙； 插入項目符號，複選框等...
• 提取文字，添加文本，按位置刪除， 刪除空間; 創建和打印分頁小計； 在單元格內容和註釋之間轉換...
• 超級濾鏡 （將過濾方案保存並應用於其他工作表）； 高級排序 按月/週/日，頻率及更多； 特殊過濾器 用粗體，斜體...
• 結合工作簿和工作表; 根據關鍵列合併表； 將數據分割成多個工作表; 批量轉換xls，xlsx和PDF...
• 超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 365。支持所有語言。 在您的企業或組織中輕鬆部署。 完整功能 30 天免費試用。 60 天退款保證。

閱讀更多... 免費下載... 採購... 

---

Office選項卡為Office帶來了選項卡式界面，使您的工作更加輕鬆

• 在Word，Excel，PowerPoint中啟用選項卡式編輯和閱讀，發布者，Access，Visio和Project。
• 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
• 將您的工作效率提高 50%，每天為您減少數百次鼠標點擊！

閱讀更多... 免費下載... 採購...