Skip to main content

Kutools for Office — 一套工具,五種功能。完成更多工作。

如何將目前頁面或每個頁面儲存為單獨的 Word 文件?

Author Xiaoyang Last modified

如果您的 Word 文件包含多個頁面,您可能會需要將當前頁面儲存為一個新的 Word 文件。通常的做法是將當前頁面的內容複製並貼到一個新的 Word 文件中,然後再進行儲存。然而,本文將向您展示更有效的方法,將當前頁面或每個頁面從單一 Word 文件中儲存為單獨的文件。

使用 VBA 程式碼將當前頁面儲存為新的 Word 文件

使用 Kutools for Word 將每個頁面儲存為單獨的 Word 文件


使用 VBA 程式碼將當前頁面儲存為新的 Word 文件

以下 VBA 程式碼將幫助您將當前頁面的內容儲存到新的 Word 文件中。請按照以下步驟操作:

  1. 按住 ALT + F11 鍵以打開 Microsoft Visual Basic for Applications 視窗。
  2. 點擊 插入 > 模組,並將以下程式碼貼到 模組 視窗中:
    Sub SaveCurrentPageAsANewDoc()
        Dim xDoc As Document
        Dim xNewDoc As Document
        Dim xFileName As String
        Dim xFolderPath As Variant
        Dim xDlg As FileDialog
        Set xDoc = ActiveDocument
        xFileName = InputBox("Enter file name here: ", "KuTools for Word")
        If xFileName = "" Then Exit Sub
        Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
        If xDlg.Show = -1 Then
            xFolderPath = xDlg.SelectedItems(1)
            xDoc.Bookmarks("\Page").Range.Select
            Selection.Copy
            Set xNewDoc = Documents.Add
            Selection.Paste
            xNewDoc.SaveAs xFolderPath & "\" & xFileName & ".docx"
            xNewDoc.Close
        End If
    End Sub
  3. 按下 F5 執行此程式碼。在彈出的對話框中,輸入新文件的名稱。參見截圖:
    Dialog with input box to enter a name for the new document
  4. 點擊「確定」,在第二個彈出的瀏覽視窗中,選擇保存新文件的文件夾。
    Browse window
  5. 點擊「確定」,當前頁面的內容將被保存為新的 Word 文件。您可以在所選文件夾中查看結果。

使用 Kutools for Word 將每個頁面儲存為單獨的 Word 文件

如果您想將整個文檔的每頁都保存為單獨的文件,Kutools for Word 的文檔拆分功能可以幫您實現。

Kutools for Word內建 AI 🤖,提供超過 100 種實用功能,助您簡化工作任務。

安裝 Kutools for Word 後,請按照以下步驟操作:

  1. 點擊 Kutools Plus > 文檔拆分。參見截圖:
    Split button on the Kutools Plus tab on the ribbon
  2. 文檔拆分 對話框中:
    1. 從「類型」下拉列表中選擇頁面。
    2. 點擊 Folder selection icon 按鈕選擇保存新文件的文件夾。
    3. 根據需要指定新保存文件的前綴。
      Split Document dialog box
  3. 完成設置後,點擊「確定」開始拆分。Word 文件中的所有頁面將作為單獨的文件保存在指定的文件夾中。參見截圖:
    All pages of the document are saved as separate files in the specific folder

最佳辦公效率工具

Kutools for Word -透過超過 100 項卓越功能,提升您的 Word 使用體驗!

🤖 Kutools AI FeaturesAI AssistantReal-Time AssistantSuper Polish(保留格式)Super Translate(保留格式)AI RedactionAI Proofread...

📘 文件掌握分割頁面文檔合併區域導出成各種格式(PDF/TXT/DOC/HTML...)批量轉換為 PDF...

正文編輯批量查找與替換多個文件批量調整所有圖片大小翻轉表格的行與列表格轉文本...

🧹 輕鬆清理:快速清除多餘空格分節符文字框超連結/更多清除工具請前往刪除工具組...

創意插入:插入千位分隔符複選框選項按鈕二維碼條形碼批量插入圖片/還有更多精彩功能在插入工具組...

🔍 精確選擇:精確定位特定頁面表格形狀標題段落/使用更多 選擇 功能提升導航效率...

亮點增強導航至任何區域自動插入重複文字切換文檔窗口11 轉換工具...

🌍 支援40+種語言:可用 Kutools於您偏好語言環境——支援英語、西班牙語、德語、法語、中文以及超過40種語言!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 想立即體驗這些功能嗎?立即下載 Kutools for Word!🚀
 

✨ Kutools for Office——一次安裝,五大強力工具!

包含 Office Tab Pro · Kutools for Excel · Kutools for Outlook · Kutools for Word · Kutools for PowerPoint

📦 五大工具一次全擁有 | 🔗 與 Microsoft Office 無縫整合 | ⚡ 即刻省時提高工作效率

最佳辦公效率工具

Kutools for Word - 100+ 款 Word 工具