Do you have a massive word that requires it to be split into separate files? So, how to split pages in Word into separate files?
Splitting a document into separate pages increases the workflow, especially when teamwork is necessary. I discussed 3 methods in this guide so you won’t have to follow old-school ways such as cutting and pasting.
Take a few minutes to read this comprehensive guide and learn the fast methods to complete this tedious task quickly.
How to Split Pages in Word into Separate Files
When you need to split a Word file into separate files, the below methods will let you do so effortlessly.
Method 01: Operate in “Outline View”
This method is extremely easy to follow. Read the steps intently.
Step 01: First, taking a backup of your file is crucial. If a mistake happens, all your data and information will be deleted.
Step 02: Next, check whether the part of the document to be split is placed below the under-level heading. For example, Heading 1, 2, 3, 4, etc. If it is, you can directly move to the next step (step #03).
If not, please type a few words or marks at the beginning and end of the texts. Then set those words or marks in “Heading 1.”
You might wonder why we won’t set those words in “Heading 2” or “Heading 3.” If we do so, the texts will have a higher heading style. As a result, getting texts out will be difficult.
Step 03: Click in the tab named “View” in the ribbon.
Step 04: Then select “Outline.”
Step 05: After clicking the “Outline” tab, the setup of your Word file will be changed. After that, locate the “Show level” option and select “Level 1” from the drop-down menu. This way, you will see all the texts titled level 1.
Step 06: Now, click on the “Show Document.” This will reveal the “Create” and “Insert” option.
Step 07: Ahead of the first mark word, you will notice a Plus sign; click it. This way, the specific part of the text will be selected.
Step 08: Then click “Create.” Thus, the document will start splitting.
Step 09: In order to split the rest of the document, you can follow Steps #07 and Step #08.
Don’t forget to save the file after completing the process. Then go to the original file location. All new documents will be there for sure.
Method 02: Using VBA Codes
Do you like the copy-and-paste process over other methods? Then, Word Macro will help you get the job done. Moreover, adding the macro to the “Quick Access Toolbar” would always be best, letting you use the process repeatedly.
Here are the steps to split Word pages into separate files using the VBA codes.
Step 01: Press “Alt + F11” together to open the VBA editor.
Step 02: You will see a blank page on the right side. Copy the below codes and paste them there.
Sub SaveSelectedTextToNewDocument()
If Selection.Words.Count > 0 Then
‘Copy the selected text
Selection.Copy
‘Open a new document and paste the copied text into it
Dim objNewDoc As Document
Set objNewDoc = Documents.Add
Selection.Paste
‘Get the first 10 characters as the filename of the new document and save them
Dim objFileName As Range
Set objFileName = objNewDoc.Range(Start:=0, End:=10)
objNewDoc.SaveAs FileName:=”C:\Users\Test\Desktop\” & objFileName & “.docx”
Else
End If
End Sub
Step 03: The codes need to be saved. After saving, add Macro to the “Quick Access Toolbar.”
Step 04: Then, hover your cursor over a few lines of text to select them. Next, click the button named Macro. You will see a new document.
Key Notes:
- The codes contain ““C:\Users\Test\Desktop\” representing where the document will be stored. You can change the code according to your preference to save the new document wherever you want.
- You can also change another part of the code: “Set objFileName = objNewDoc.Range(Start:=0, End:=10)” It means the new document’s name will be saved with the first 10 characters of the selected texts.
Method 03: Using Specified Delimiter with VBA
Step 01: Press “Alt + F11” together to open the VBA editor.
Step 02: Then right-click Insert > Module. A new Module window will be opened. Copy the below VBA codes and paste them there.
Sub SplitNotes(delim As String, strFilename As String)
Dim doc As Document
Dim arrNotes
Dim I As Long
Dim X As Long
Dim Response As Integer
arrNotes = Split(ActiveDocument.Range, delim)
Response = MsgBox(“This will split the document into ” & UBound(arrNotes) + 1 & ” sections.Do you wish to proceed?”, 4)
If Response = 7 Then Exit Sub
For I = LBound(arrNotes) To UBound(arrNotes)
If Trim(arrNotes(I)) <> “” Then
X = X + 1
Set doc = Documents.Add
doc.Range = arrNotes(I)
doc.SaveAs ThisDocument.Path & “\” & strFilename & Format(X, “000”)
doc.Close True
End If
Next I
End Sub
Sub test()
‘delimiter & filename
SplitNotes “///”, “Notes “
End Sub
Step 03: Now, you have to apply for the VBA. For this, hit the F5 key or click the Run button.
Step 04: Finally, click the YES button in the Microsoft Word Document to proceed.
Important Note:
- The split Word file will be saved to the original file’s location.
- Adding Delimiter to the end of the original file is completely unnecessary. If you do so, a blank document will appear after splitting.
- Changing the documents “Notes” in the sub-test is possible per your requirement.
How to Split Mail Merge into Separate Documents in Microsoft Word
Can I split a Word document and save it as a PDF file?
You can split a Word document and save it as a PDF file with VBA. You must copy and paste the codes below into the Microsoft Visual Basic for Applications Module window.
Sub SaveAsSeparatePDFs()
‘UpdatebyExtendoffice20181120
Dim I As Long
Dim xDlg As FileDialog
Dim xFolder As Variant
Dim xStart, xEnd As Integer
On Error GoTo lbl
Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
If xDlg.Show <> -1 Then Exit Sub
xFolder = xDlg.SelectedItems(1)
xStart = CInt(InputBox(“Start Page”, “KuTools for Word”))
xEnd = CInt(InputBox(“End Page:”, “KuTools for Word”))
If xStart <= xEnd Then
For I = xStart To xEnd
ActiveDocument.ExportAsFixedFormat OutputFileName:= _
xFolder & “\Page_” & I & “.pdf”, ExportFormat:=wdExportFormatPDF, _
OpenAfterExport:=False, OptimizeFor:=wdExportOptimizeForPrint, Range:= _
wdExportFromTo, From:=I, To:=I, Item:=wdExportDocumentContent, _
IncludeDocProps:=False, KeepIRM:=False, CreateBookmarks:= _
wdExportCreateHeadingBookmarks, DocStructureTags:=True, _
BitmapMissingFonts:=False, UseISO19005_1:=False
Next
End If
Exit Sub
lbl:
MsgBox “Enter right page number”, vbInformation, “KuTools for Word”
End Sub
Then, hit the F5 key in the browse folder and select a folder to save the Word file as PDF.
Summing Up
The process of how to split pages in Word into separate files is extremely simple. You can follow any method to split the pages.
As mentioned earlier, save the original file before following the methods.