如何将一个word文档按页分割成多个word文档？

您可以使用Python的`python-docx`库和`docx2txt`库来实现这个功能。首先，确保您的环境中安装了这两个库，可以通过以下命令安装：

```bash
pip install python-docx docx2txt
```

然后，可以使用以下Python脚本来将一个Word文档按页分割成多个Word文档：

```python
from docx import Document

def split_word_by_pages(input_path, output_dir):
doc = Document(input_path)
num_pages = len(doc.tables) + len(doc.paragraphs)

for i in range(num_pages):
new_doc = Document()
for j in range(i, num_pages, num_pages):
if j < num_pages:
new_doc.add_paragraph(doc.paragraphs[j].text)
output_path = f"{output_dir}/page_{i+1}.docx"
new_doc.save(output_path)

split_word_by_pages('input.docx', 'output')
```

请注意，此脚本假设每页包含一个段落或表格项。如果您的文档结构更复杂，可能需要调整代码以适应具体需求。

工作中时常遇到，需要把一个word文件，分割成多个word文件。现在我来给大家简单的介绍一下吧。

操作方法

01

在Word里面打开那个需要分割的文档（假设它的文件名叫做“原始文档.doc”）；

02

键入ALT+F11打开VBA编辑器，选择菜单“插入-模块”；

03

粘贴下面的代码： 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 oSrcDoc.Windows(1).Activate Application.Browser.Target = wdBrowsePage Application.Browser.Next strSrcName = oSrcDoc.FullName strNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _ fso.GetBaseName(strSrcName) & "_" & nIndex & "." & fso.GetExtensionName(strSrcName)) Set oNewDoc = Documents.Add Selection.Paste oNewDoc.SaveAs strNewName oNewDoc.Close False Next Set oNewDoc = Nothing Set oRange = Nothing Set oSrcDoc = Nothing Set fso = Nothing MsgBox "结束！" End Sub