跳到主要內容

從 Word 文件中拆分和提取頁面(4 種方法)

作者:孫 最後修改時間:2024-04-22

管理較長的 Word 文件有時可能需要您提取特定頁面以進行單獨審查或分發。無論您只需要一頁、一系列頁面,還是根據特定條件拆分整個文檔,Microsoft Word 都提供了多種方法來實現此目的。讓我們深入了解從 Word 文件中拆分和提取頁面的四種有效方法。

從Word中提取特定頁面/當前頁面

根據頁面、標題、分隔符號將整個 Word 文件拆分為單獨的文件


從Word中提取特定頁面/當前頁面

 

本指南詳細概述了從文件中提取特定頁面或當前頁面的三種有效技術。


透過複製和貼上功能提取頁面 - 手動

從 Word 文件中提取特定頁面或內容的最簡單方法是使用複製和貼上功能。

步驟1:選擇要提取的內容

將遊標置於要複製的內容的前面,然後向下捲動到內容的末尾,並按住 Shift 鍵,按一下內容末端的 。

第二步:複製選取的內容

右鍵單擊所選內容並選擇 複製, 或直接按下 Ctrl + C

步驟 3:貼上到新文件中

開啟新的 Word 文件並使用以下命令貼上內容 Ctrl + V.

步驟 4:儲存新文檔

按一下儲存新建立的文檔 文件 > 另存為.


透過列印到 PDF 功能提取頁面 - 將提取的頁面儲存到 PDF

提取頁面的另一種方法是將其列印為 PDF。當您需要以廣泛接受的格式共享或保存提取的頁面時,此方法非常方便。

第 1 步:導覽至列印選單

開啟文件後,前往 文件 > 列印.

步驟 2:選擇“Microsoft 列印到 PDF”

Printer 下拉,選擇 Microsoft打印為PDF.

步驟 3:指定頁面範圍

在設定中選擇您想要的列印範圍:

  • 打印所有頁面:列印文檔的所有頁面。

  • 打印選擇:列印選擇,如果不選擇任何範圍,則無法使用此選項。

  • 打印當前頁面:列印當前頁。

  • 自訂列印:根據需要列印自訂頁面範圍。當您選擇此選項時, 將顯示文字方塊供您鍵入列印頁碼。

步驟4:列印

點擊 列印,然後選擇儲存 PDF 的位置。指定的頁面將另存為新的 PDF 文件。


透過 VBA 程式碼提取頁面 - 將提取的頁面儲存到特定資料夾

對於熟悉 VBA 的用戶,使用腳本可以自動執行提取過程,對於大型文件尤其有用。

注意:下面的程式碼只能一次提取連續範圍的頁面。
步驟 1:按 Alt + F11 鍵開啟 VBA 編輯器
第 2 步:插入新模組

點擊 插入 在打開的選項卡中 Microsoft Visual Basic for Applications 窗口,然後選擇 模塊.

步驟3:插入代碼

複製下面的程式碼並將其貼到模組中。

程式碼:將一系列頁面提取到資料夾中的新檔案中

Sub SaveSpecifiedPagesAsNewDoc()
'UpdatebyKutools
    Dim objNewDoc As Document
    Dim objDoc As Document
    Dim strFolder As String
    Dim strFileName As String
    Dim startPage As Long
    Dim endPage As Long
    Dim startRange As Range
    Dim endRange As Range
    
    ' Initialize
    Set objDoc = ActiveDocument
    
    ' Specify the folder path and file name here
    strFolder = "C:\Users\AddinsVM001\Desktop\pdf\extract pages" ' Example path
    strFileName = "ExtractedPages" ' Example file name
    
    ' Specify start and end pages here
    startPage = 3
    endPage = 4
    
    ' Find the range of the specified pages
    With objDoc
        ' Go to the start of the start page
        .GoTo(What:=wdGoToPage, Which:=wdGoToAbsolute, Count:=startPage).Select
        Set startRange = Selection.Range
        
        ' Go to the start of the page after the end page, to get the complete end page
        .GoTo(What:=wdGoToPage, Which:=wdGoToAbsolute, Count:=endPage + 1).Select
        Selection.MoveLeft Unit:=wdCharacter, Count:=1
        Set endRange = Selection.Range
        
        ' Define the range from start to end page
        Set startRange = .Range(Start:=startRange.Start, End:=endRange.End)
       
        
    End With
    
    ' Copy the defined range
    startRange.Copy
    
    ' Open a new document to paste the selection
    Set objNewDoc = Documents.Add
    objNewDoc.Content.Paste
    
    ' Save the new document
    objNewDoc.SaveAs2 FileName:=strFolder & "\" & strFileName & ".docx"
    objNewDoc.Close False
    
    ' Clean up
    Set objNewDoc = Nothing
    Set objDoc = Nothing
    Set startRange = Nothing
    Set endRange = Nothing
    
    MsgBox "Pages " & startPage & " to " & endPage & " have been extracted to " & strFileName & ".docx"
End Sub
 

注意:此腳本可讓您直接在程式碼中設定要提取的頁面範圍、檔案名稱和儲存路徑。請依實際需求修改strFolder、strFileName、startPage、endPage的值。當您執行此巨集時,它將自動提取指定範圍的頁面並將它們儲存到新的 Word 文件中,所有這些都無需任何使用者互動。
第四步:點擊運行按鈕 或按F5鍵運行程式碼

運行程式碼後,會彈出一個對話框,告訴您頁面已被提取,點擊 OK 關閉它。

步驟5:進入資料夾檢查頁面是否正確擷取


根據頁面、標題、分隔符號將整個 Word 文件拆分為單獨的文件

如果您想要提取頁面以按標題 1、分頁符號、分節符號或特定頁面分隔文件,則 分割文件 的特點 Kutools for Word 將是一個好幫手。

在使用分割文件功能之前,應該安裝Kutools for Word, 立即享受 60 天免費試用!
第 1 步:啟動拆分文檔功能

點擊 Kutools 加 > 分裂 激活功能。

第 2 步:自訂您的拆分
  1. 分割為:選擇您要分割的標準。

  2. :如果你選擇 習俗 ,在 分割為 在下拉清單中,您應該在此文字方塊中鍵入頁碼。

  3. 儲存:瀏覽並選擇一個資料夾來定位分割文件。

  4. 文件前綴:輸入分割文件的命名前綴。

  5. OK:點選完成分割。

第三步:進入資料夾,查看分割後的文檔

使用 Kutools 釋放 Word 的全部潛力!經驗滿 100 強大的工具旨在簡化您的文件管理並增強您的編輯能力。 立即下載,以實現革命性的生產力提升!

每種方法都提供了滿足不同需求的解決方案:用於簡單提取的手動複製、用於共享特定頁面的列印為 PDF、用於自動提取的 VBA 以及用於組織大量文件的文件分割。透過執行這些步驟,您可以更有效地管理文件並根據您的特定要求自訂內容。

有關可顯著增強資料管理的其他變革性 Word 策略, 在這裡進一步探索。.

最佳辦公生產力工具

Kutools for Word - 透過 Over 提升您的文字體驗 100 顯著特點!

🤖 Kutools 人工智慧助手:用人工智慧改變你的寫作 - 生成內容  /  重寫文字  /  總結文件  /  查詢資料 基於文檔,全部在Word中

📘 文件掌握: 分頁  /  合併文件  /  以各種格式匯出選擇(PDF/TXT/DOC/HTML...)  /  批次轉換為PDF  /  將頁面匯出為圖像  /  一次列印多個文件...

內容編輯: 批量查找和替換 跨多個文件  /  調整所有圖片的大小  /  轉置表行和列  /  將表格轉換為文字...

🧹 輕鬆清潔: 移開 多餘的空間  /  分節符  /  所有標題  /  文本框  /  超鏈接  / 如需更多拆卸工具,請前往我們的 刪除組...

創意插入: 插入 千位分隔符  /  複選框  /  單選按鈕  /  QR Code  /  條碼  /  對角線表  /  公式標題  /  圖片說明  /  表格標題  /  多張圖片  / 發現更多 插入組...

🔍 精準選擇:精確定位 特定頁面  /    /  形狀  /  標題段落  / 增強導航功能 更多 選擇功能...

星級增強: 快速導航至任何位置  /  自動插入重複文字  /  在文檔視窗之間無縫切換  /  11 轉換工具...

???? 想嘗試這些功能嗎? Kutools for Word 提供了 60天免費試用,沒有任何限制! 🚀
 
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations