Управлението на дълъг документ на Word понякога може да изисква от вас да извлечете конкретни страници за отделно разглеждане или разпространение. Независимо дали имате нужда само от една страница, набор от страници или да разделите целия документ въз основа на конкретни критерии, Microsoft Word предлага няколко начина да постигнете това. Нека се потопим в четири ефективни метода за разделяне и извличане на страници от вашите Word документи.

Извличане на конкретни страници / текуща страница от Word

• Чрез функцията за копиране и поставяне - ръчно
• Чрез функцията за печат в PDF - запишете извлечените страници в PDF
• Чрез VBA код - запазване на извлечените страници в определена папка

Разделете целите документи на Word, за да отделите файлове въз основа на страници, заглавия, прекъсвания

Video: Extract Pages in Word

Извличане на конкретни страници / текуща страница от Word

This guide provides a detailed overview of three efficient techniques to extract either specific pages or the current page from your document.

Извличане на страници чрез функцията за копиране и поставяне – ръчно

Най-лесният начин за извличане на конкретни страници или съдържание от документ на Word е чрез използване на функцията за копиране и поставяне.

Стъпка 1: Изберете съдържанието, което искате да извлечете

Place the cursor at the front of the contents you want to copy, then scroll down to the end of the contents, and hold Shift key, click at the end of the contents.

Стъпка 2: Копирайте избраното съдържание

Щракнете с десния бутон върху избраното съдържание и изберете Копирайте, или просто натиснете Ctrl + C

Стъпка 3: Поставете в нов документ

Отворете нов документ на Word и поставете съдържанието, като използвате Ctrl + V.

Стъпка 4: Запазете новия документ

Запазете новосъздадения документ, като щракнете досие > Save As.

Извличане на страници чрез функцията Print to PDF - запазване на извлечените страници в PDF

Друг начин за извличане на страници е като ги отпечатате в PDF. Този метод е удобен, когато трябва да споделите или запазите извлечените страници в широко приет формат.

Стъпка 1: Отидете до менюто за печат

С отворен документ отидете на досие > Изпринти.

Стъпка 2: Изберете Microsoft Print to PDF

в Printer падащо меню, изберете Microsoft Print към PDF.

Стъпка 3: Посочете обхвата на страниците

В настройките изберете диапазона на печат, който желаете:

• Печат на всички страници: Отпечатайте всички страници на документа.

• Избор на печат: Отпечатайте селекцията, ако не изберете диапазон, тази опция не може да се използва.

• Отпечатайте текущата страница: Отпечатайте текущата страница.

• Персонализиран печат: Отпечатайте персонализирани диапазони от страници, както ви е необходимо. Когато изберете тази опция, страница текстовото поле се показва, за да въведете номера на страницата за печат.

  

Стъпка 4: Печат

Кликнете Изпринтии изберете място за запазване на вашия PDF файл. Посочените страници ще бъдат запазени като нов PDF документ.

Извличане на страници чрез VBA код - запазване на извлечените страници в определена папка

За потребители, работещи добре с VBA, използването на скрипт може да автоматизира процеса на извличане, особено полезно за големи документи.

Стъпка 1: Натиснете клавишите Alt + F11, за да отворите VBA Editor

Стъпка 2: Поставете нов модул

Кликнете Поставете раздел в отворения Microsoft Visual Basic за приложения прозорец, след което изберете Модули.

Стъпка 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
 

Стъпка 4: Щракнете върху бутона за изпълнение или натиснете клавиша F5, за да стартирате кода

След стартиране на кода се появява диалогов прозорец, който ви казва, че страниците са извлечени, щракнете OK да го затворите.

Стъпка 5: Отидете в папката, за да проверите дали страниците са извлечени правилно

Разделете целите документи на Word, за да отделите файлове въз основа на страници, заглавия, прекъсвания

Ако искате да извлечете страници, за да разделите файловете по заглавия 1, прекъсвания на страници, прекъсвания на раздели или конкретни страници, Разделен документ функция на Kutools за Word ще бъде добър помощник.

Стъпка 1: Активирайте функцията Разделен документ

Кликнете Kutools плюс > разцепен за да активирате функцията.

Стъпка 2: Персонализирайте вашето разделение

1. Разделяне по: Изберете критерия, по който искате да разделите.

2. страница: Ако изберете Custom в Разделяне по падащ списък, трябва да въведете номерата на страниците в това текстово поле.

3. Спести в: Прегледайте и изберете папка, за да намерите разделените документи.

4. Префикс на документа: Въведете префикс за именуване на разделените документи.

5. OK: Щракнете, за да завършите разделянето.

   

Стъпка 3: Отидете в папката и проверете разделените документи

Всеки метод предлага решение за различни нужди: ръчно копиране за прости извличания, отпечатване в PDF за споделяне на конкретни страници, VBA за автоматизирано извличане и разделяне на документи за организиране на обширни документи. Следвайки тези стъпки, можете да управлявате вашите документи по-ефективно и да приспособите съдържанието към вашите специфични изисквания.

За допълнителни трансформиращи стратегии на Word, които могат значително да подобрят управлението на вашите данни, проучете повече тук..