一、怎么将word多页分成多个文档
WORD多个页面分成多个文档，可以直接新建多个空白文档，然后把每一页的内容复制粘贴过去另存为一个文档就可以实现了。
所需工具：WPS
2016版本演示
操作步骤:
第一步，打开一个多页的文档，然后使用快捷键Ctrl+N新建若干个空白文档，如图所示。
第二步，把需要分开的文档页面，全选一页内容进行复制---粘贴到新建的空白文档中去。
第三步，粘贴到空白文档，然后进行文件的命名保存，快捷键Ctrl+S。重复操作，直至全部页面的内容保存完毕即可。
二、怎样将一个word文档分成几个文档
页数少的话可通过删除另存的方法实现：
比如说30页的文档要分成3个10页的文档：首先打开文件，删除后20页后另存文件1；然后再次打开原始文档，分别删除前10页和后10页另存文件2；再次打开原始文档，删除前20页后另存文件3.这样，一个30页的文档就分成了3个10页的文档。这种方法适合页面比较少的情况，特别适合分开文档页面不均等的情况。
如果页数非常多，并且要求分开文档页数固定，可以用宏来实现，参考以下代码：
Sub SplitEveryFivePagesAsDocuments()
Dim oSrcDoc As Document, oNewDoc As Document
Dim strSrcName As String, strNewName As String
Dim oRange As Range
Dim nIndex As Integer, nSubIndex As Integer, nTotalPages As Integer, nBound As Integer
Dim fso As Object
Const nSteps = 5 ' 修改这里控制每隔几页分割一次
Set fso = CreateObject("Scripting.FileSystemObject")
Set oSrcDoc = ActiveDocument
Set oRange = oSrcDoc.Content
nTotalPages = ActiveDocument.Content.Information(wdNumberOfPagesInDocument)
oRange.Collapse wdCollapseStart
oRange.Select
For nIndex = 1 To nTotalPages Step nSteps
Set oNewDoc = Documents.Add
If nIndex + nSteps > nTotalPages Then
nBound = nTotalPages
Else
nBound = nIndex + nSteps - 1
End If
For nSubIndex = nIndex To nBound
oSrcDoc.Activate
oSrcDoc.Bookmarks("page").Range.Copy
oSrcDoc.Windows(1).Activate
Application.Browser.Target = wdBrowsePage
Application.Browser.Next
oNewDoc.Activate
oNewDoc.Windows(1).Selection.Paste
Next nSubIndex
strSrcName = oSrcDoc.FullName
strNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _
fso.GetBaseName(strSrcName) & "_" & (nIndex nSteps + 1) & "." & fso.GetExtensionName(strSrcName))
oNewDoc.SaveAs strNewName
oNewDoc.Close False
Next nIndex
Set oNewDoc = Nothing
Set oRange = Nothing
Set oSrcDoc = Nothing
Set fso = Nothing
MsgBox "结束！"
End Sub
三、一个word文档怎么拆分成多个文档
1、视图——大纲，切换到大纲视图，选中要拆分的标题及正文（选定的方法是鼠标移到该标题前的空心十字符号，此时鼠标指针变成十字箭头，单击鼠标即可选定该标题包括的内容）
2、单击【大纲】工具栏中的【创建子文档】按钮，每个子文档会放在一个虚线框中，并且在虚线框的左上角显示一个子文档图标，子文档之间用分节符隔开。
3、把文件保存下来即可。Word
在保存主文档的同时，会自动保存创建的子文档，并且以子文档的第一行文本作为文件名。
