如何將活頁簿中的每個工作表分別儲存為純文字檔？

作者孫修改日期2024-11-13

當您想將工作表儲存為純文字檔時，可透過 Excel 的「另存新檔」功能輕鬆達成。但若需將活頁簿中的每個工作表分別儲存為獨立的純文字檔，重複執行「另存新檔」步驟恐怕會令人感到煩瑣。以下將為您介紹幾種實用技巧，助您在 Excel 中快速搞定這項枯燥任務！

使用 VBA 將當前工作表儲存為純文本

使用 Kutools for Excel 將活頁簿中的每個工作表分別儲存為純文本

使用 Kutools for Excel 將選取的工作表匯出為純文本

使用 VBA 將當前工作表儲存為純文本

如果您不喜歡透過「另存新檔」功能將工作表儲存為純文字，也可以改用 VBA 程式碼。

1. 啟用您要儲存為純文字的工作表。

2. 按下 Alt + F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗！

3. 在視窗中點選插入> 模組，並將下方的 VBA 程式碼貼上至模組中。

Sub SaveSheetToTxt()
'Updateby20150910
    Dim xRet As Long
    Dim xFileName As Variant
    On Error GoTo ErrHandler:
    xFileName = Application.GetSaveAsFilename(ActiveSheet.Name, "TXT File (*.txt), *.txt", , "Kutools for Excel")
    If xFileName = False Then Exit Sub
    If Dir(xFileName) <> "" Then
        xRet = MsgBox("File '" & xFileName & "' exists.  Overwrite?", vbYesNo + vbExclamation, "Kutools for Excel")
        If xRet <> vbYes Then
            Exit Sub
        Else
            Kill xFileName
        End If
    End If
    ActiveSheet.Copy
    ActiveWorkbook.SaveAs xFileName, xlUnicodeText
    If ActiveWorkbook.Name <> ThisWorkbook.Name Then
        ActiveWorkbook.Close False
    End If
My_Exit:
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
End Sub

4. 按一下執行按鈕以執行程式碼，接著在 Kutools for Excel 對話方塊中選擇資料夾，指定純文字檔案的儲存位置並命名。請參閱截圖：

Kutools for Excel「另存為文字檔」對話框的螢幕截圖

5. 按一下儲存，即可將目前工作表儲存為純文字格式。

提示：使用 VBA 時，每次僅能將一個工作表儲存為純文字。

使用 Kutools for Excel 將活頁簿中的每個工作表分別儲存為純文本

如果您有一個包含數百個工作表的大型活頁簿，需要全部儲存為獨立的純文字檔，使用 VBA 方法同樣耗時費力。此時，不妨試用 Kutools for Excel 的分割工作簿功能，輕鬆完成這項任務，為您帶來意想不到的驚喜！

Kutools for Excel 提供超過 300 項進階功能，簡化複雜作業，提升創造力與效率。整合 AI 功能，Kutools 能精準自動化各項任務，讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊…… 免費試用……

1. 開啟您要將工作表儲存為獨立純文字檔的活頁簿，然後點選 KUTOOLS PLUS> 活頁簿> 分割工作簿。請參閱截圖：

Excel 中 Kutools Plus 索引標籤的「分割活頁簿」功能螢幕截圖

2. 在分割工作簿對話方塊中，選取您要分割並儲存為純文字的工作表（預設會自動選取所有工作表），勾選指定儲存格式，並從下方下拉清單中選取 Unicode 文字（*.txt）。請參閱截圖：

「分割活頁簿」對話框的螢幕截圖

3. 按一下分割，然後在瀏覽資料夾對話方塊中，選擇用來存放純文字檔的資料夾。請參閱截圖：

「瀏覽資料夾」對話框的螢幕截圖

4. 按一下確定，活頁簿中的每個工作表便會立即儲存為獨立的純文字檔，並存放於您所選的資料夾中！

透過分割工作簿功能，Kutools for Excel 可將活頁簿分割並儲存為獨立的 xls、xlsx、PDF 或 CSV 檔案，立即點擊了解更多！

Kutools for Excel－透過超過 300 項必備工具全面強化 Excel，讓您的工作更快速、更輕鬆，並運用 AI 功能實現更聰明的資料處理與高效生產力！立即取得

使用 Kutools for Excel 將選取的工作表匯出為純文本

透過 Kutools for Excel，您還可使用其導出區域至文件功能，將工作表的指定範圍輕鬆匯出為純文字檔！

Kutools for Excel－內含超過 300 項 Excel 必備工具，讓您的 Excel 作業更快速、更簡單、更高效！立即下載！

1. 選取您要儲存為純文字的儲存格範圍（可多選），然後點選 KUTOOLS PLUS> 匯入/匯出> 匯出區域至文件。請參閱截圖：

Excel 中 Kutools Plus 索引標籤的「將範圍匯出至檔案」選項螢幕截圖

2. 在彈出的對話方塊中，先於文件類型區段勾選 Unicode 文本選項，接著前往文本設置區段，依需求勾選其中一個選項，再選取一種保存區域。

「將範圍匯出至檔案」對話框的螢幕截圖

3. 按一下確定。在隨即彈出的導出區域至文件對話方塊中，為匯出的純文字檔案命名，然後按一下確定按鈕。

用於命名匯出檔案的「將範圍匯出至檔案」對話框螢幕截圖

至此，所選範圍已成功匯出為獨立純文字檔。

Kutools for Excel－透過超過 300 項必備工具全面強化 Excel，讓您的工作更快速、更輕鬆，並運用 AI 功能實現更聰明的資料處理與高效生產力！立即取得

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多