在 Word 中可以通过以下步骤将文档按页拆分保存：

1. 打开需要拆分的 Word 文档。

2. 按下 Alt + F11 键，打开 VBA 编辑器。

3. 点击插入，然后选择模块，在新的模块中粘贴以下代码：

```Option Explicit  

Sub SplitPagesAsDocuments()  

  Dim oSrcDoc As Document, oNewDoc As Document  

  Dim strSrcName As String, strNewName As String  

  Dim oRange As Range  

  Dim nIndex As Integer  

  Dim fso As Object  

  Set fso = CreateObject("Scripting.FileSystemObject")  

  Set oSrcDoc = ActiveDocument  

  Set oRange = oSrcDoc.Content  

  oRange.Collapse wdCollapseStart  

  oRange.Select  

  For nIndex = 1 To ActiveDocument.Content.Information(wdNumberOfPagesInDocument)  

    oSrcDoc.Bookmarks("page").Range.Copy  

    strNewName = strSrcName & "_" & nIndex & ".docx"  

    fso.CreateTextFile(strNewName).Write oSrcDoc.Bookmarks("page").Range.Text  

    oNewDoc = Documents.Open(strNewName)  

    oNewDoc.SaveAs strNewName  

  Next nIndex  

End Sub  

```

4. 关闭 VBA 编辑器。

5. 回到 Word 文档，按下 Alt + F8 键，打开宏命令窗口。

6. 选择刚刚创建的 "SplitPagesAsDocuments" 宏，并点击运行按钮。

按照以上步骤操作，您Word 文档将被按页拆分并保存为单独的 Word 文件。