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

如题所述

1、在Word里面打开那个需要分割的文档(假设它的文件名叫做“原始文档.doc”);
键入ALT+F11打开VBA编辑器,选择菜单“插入-模块”;
粘贴下面的代码:
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
键入F5运行,看到“完成!”结束。
2、检查当前文档所在路径下是否生成若干名为“原始文档_n.doc”(n代表其对应原始文档中的第几页)的文档,检查它们的内容是否就对应于原始文档每个页面的内容。
如文档中有分节符分解后的文档会出现空白页,如要分解后不出现空白页,需要把文档中的分节符删除。消除分节符的方法:
注意事项
分节符若全部替换,要注意替换后文档可能会出现排版混乱,这则需要自己手动排版了。
温馨提示:内容为网友见解,仅供参考
无其他回答

word能按页拆分成单独文档吗
word具备将文档按页拆分为独立文档的功能。操作流程如下:首先在主界面点击“视图”选项,然后选择“大纲视图”模式。接着,点击“显示文档”按钮,并在随后出现的对话框中选择“显示级别”,将右侧的级别设置为二级。接下来,点击“创建”按钮,即可将文档分割成多个子文档。word的主要功能包括:首先,word...

将一个Word文档按页拆分成多个独立文档,同事1天的工作量,你只要半分...
在文件夹内打开那个需要按页拆分的文档(本例中它的文件名叫做“Excel情报局”)键入ALT+F11打开VBA编辑器(或者点击“开发工具”选项卡,点击"visual basic,进入VBA编辑器)。点击“插入-模块”,将下面一段VBA代码复制粘贴到该新建的模块中。点击上方的“运行-运行子过程\/窗体”,稍等几秒会弹出一个...

如何将一张纸分成4个版?
在电脑上打开一个word文档,然后点击页面布局页面中页面设置区域的箭头图标。然后在页面设置页面,将所有页边距的值都设置为0,点击确定。然后在插入表格的界面中插入1个1列4行的表格进word页面中。点击页面布局——分栏——更多分栏;在弹出选项卡中设置栏数为4,然后点击确定。word如何将一张纸分成四份...

word能按页拆分成单独文档吗?
word可以按页拆分成单独文档,具体操作方法是:首先点击“视图”;然后点击“大纲视图”;接着点击“显示文档”;然后选择“显示级别”,右边选择二级;接下来“创建”一个子文档;这样就把这个文档分成了多个小文档。word的主要功能 1、文字编辑功能。word软件可以编排文档,包括在文档上编辑文字、图形、图...

怎样把Word文档分割成多个文件?
在Word中,可以通过“分割文档”或者“复制粘贴”的方法将某几页保存为一个单独的文件。1. 使用“分割文档”功能 首先,打开你的Word文档。选择“视图”菜单中的“导航窗格”选项,这样可以在左侧看到文档的页面缩略图。在导航窗格中,选中你想要保存的那几页的首页。然后按住Shift键,同时选中你想要保存...

批量将word文档按页拆分成多个独立文档有什么办法
首先,打开所提供的工具,选择“合并拆分”功能,然后聚焦于“Word文档拆分”选项。添加文件的方式多样,可以直接拖入文件,通过左上角的“添加文件”按钮,或者批量导入文件夹中的文档。在“拆分方式”中,选择“按页面数量拆分”,明确你希望每个新文件包含多少页,例如设置为每页为一个文件。接下来,设置...

如何将word文档按页码拆分如何将word文档按页码拆分成两页
如果你想将一个Word文档按页码拆分成多个文档,可以按照以下步骤操作:1. 打开要拆分的Word文档。2. 在菜单栏中选择查看选项卡,然后点击导航窗格,打开导航窗格。3. 在导航窗格中选择页码选项卡,显示文档的页码列表。4. 在页码列表中选择你想要拆分的起始页码。5. 点击鼠标右键,选择复制,或使用快捷...

如何将一页Word文档内容分成几份?
1、首先点击需要拆分的Word文档左上角的“文件”选项,点击其中的“新建”按钮。2、然后点击“空白文档”的选项来新建一个新的空白Word文档。3、然后点击“视图”选项卡中的“大纲”视图的选项。4、选中需要新建文档的页面内容并点击右键选择“剪切”按钮。5、切换到新建的Word文档并按下Ctrl+V进行粘贴...

如何将一个word文档快速拆分成多个文档
开始操作,第一步:打开工具箱,点击“合并拆分”功能,选择“Word拆分成多个文件”。第二步:通过直接拖放、添加文件或从文件夹批量添加选择文档。第三步:设置拆分方式。以“按文件数量拆分”为例,打开设置,输入所需拆分的文件数量。图示为拆分为2个文件。第四步:设置保存位置,预览结果,点击下一步...

word怎么按页拆分word怎么按页拆分成多个文档
1. 打开需要拆分的Word文档。2. 在页面底部的状态栏上,点击“页面布局”视图。3. 在“页面布局”视图下,点击“分隔符”按钮,选择“下一页”。4. 将光标移动到需要拆分的页的开头。5. 在“插入”菜单中,选择“分隔符”,再选择“分页符”。6. 重复以上步骤,直到将整个文档拆分为多个页。7. ...

相似回答