亞寵展、全球寵物產業風向標——亞洲寵物展覽會深度解析
619
2025-03-31
如何將當前頁面或每個頁面另存為單獨的Word文檔？
如何將當前頁面或每個頁面另存為單獨的Word文檔？
現在，如果您的Word文檔中有多個頁面，則只需要將當前頁面保存為一個新的Word文件。 通常，您可以將當前頁面數據復制并粘貼到新的Word文件中，然后將其保存。 但是，在本文中，我將討論如何將當前頁面或每個頁面另存為Word文件中的單獨文檔。
使用VBA代碼將當前頁面另存為新的Word文檔
使用 Kutools for Word 將每個頁面保存為單獨的 Word 文檔
使用VBA代碼將當前頁面另存為新的Word文檔以下VBA代碼可以幫助您將當前頁面內容保存到新的Word文件中，請執行以下操作：
1。 按住 ALT + F11 鍵打開 Microsoft Visual Basic應用程序 窗口。
2。 點擊 插頁 > 模塊，然后將以下代碼粘貼到“模塊窗口”中。
VBA代碼：將當前頁面另存為新的Word文檔：
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鍵以運行此代碼，請在彈出的對話框中輸入新文件的名稱，請參見屏幕截圖：
4。 然后，點擊 OK 按鈕，然后在第二個彈出窗口中，選擇一個文件夾以輸出新文件，請參見屏幕截圖：
5。 點擊 OK 按鈕，當前頁面內容已保存為新的Word文件，您可以轉到該文件夾??以查看結果。
使用 Kutools for Word 將每個頁面保存為單獨的 Word 文檔如果要將整個文檔的每一頁另存為單獨的文件，則 Kutools for Word“ 分裂 功能可以幫您一個忙。
Kutools for Word : 帶有超過100個方便的Word加載項，可以在60天內免費試用.前往下載60天免費試用購買貝寶/ MyCommerce
安裝后 Kutools for Word，請執行以下步驟：
1。 點擊 Kutools 加 > 分裂，請參見屏幕截圖：
2。 在 分割文件 對話框：
（1.）選擇 頁 來自 分割為 下拉列表;
（1.）點擊 按鈕選擇一個文件夾以輸出新文件；
（2.）然后，根據需要指定新保存文件的前綴。
3。 完成設置后，單擊 OK 按鈕開始拆分，然后，Word文檔中的所有頁面都已另存為單獨的文件，保存在特定的文件夾中，如以下屏幕截圖所示：
點擊下載Kutools for Word并立即免費試用！
最佳辦公生產力工具
Kutools for Word - 通過 Over 提升您的文字體驗 100 顯著特點！深入了解下面突出顯示的功能或 單擊此處探索 Kutools for Word 的全部功能.
?? 文檔掌握: 分頁 / 合并文件 / 以各種格式導出選擇（PDF/TXT/DOC/XLSX） / 批量轉換為PDF / 將頁面導出為圖像 / 一次打印多個文件 ...
? 內容編輯: 批量查找和替換 跨多個文件 / 調整所有圖片的大小 / 轉置表行和列 / 將表格轉換為文字 ...
?? 輕松清潔: 掃開 多余的空間 / 分節符 / 所有標題 / 文本框 / 超鏈接 / 如需更多刪除工具，請前往我們的刪除組
? 創意插入: 插頁 千位分隔符 / 復選框 / 單選按鈕 / 二維碼 / 條碼 / 對角線表 / 公式標題 / 圖片說明 / 表標題 / 多張圖片 / 在我們的插入組中發現更多信息
?? 精準選擇: 精確定位特定頁面 / 表 / 形狀 / 標題段落 / 使用我們的選擇組輕松導航
? 星級增強: 快速導航至任何位置 / 自動插入重復文本 / 在文檔窗口之間無縫切換 / 11 轉換工具 ...
使用 Kutools 轉換您的 Word 任務。 ?? 立即下載并試用 30 天 ??。
了解更多 免費下載 購買
版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。
版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。
相關文章
