内容导航:


一、怎么把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文档,将光标移动到需要插入分页符的地方。点击布局,选择分隔符。点击分页符,这样即可在光标位置插入分页符。
分页符是分页的一种符号,上一页结束以及下一页开始的位置。
MicrosoftWord可插入一个"自动"分页符(或硬分页符),或者通过插入"手动"分页符(或软分页符)在指定位置强制分页。
分节符起着分隔其前面文本格式的作用。如果删除了某个分节符,它前面的文字会合并到后面的节中,并且采用后者的格式设置。
若想删除分节符同时保留分节符前面的格式,需要进入分节符后的页眉页脚编辑状态,并选择链接到前一条页眉,退出页眉页脚编辑状态,然后再删除分节符即可保留分节符前面的格式。


三、怎么把一篇word文档拆分成两页显示


1、首先打开的Word文档有两页内容,需要调整到一页中显示。

2、点击文档上方工具栏的“布局”选项卡中的“页边距”选项。

3、在打开的“页边距”的下拉菜单中选择“自定义页边距”选项。

4、在打开的设置页边距对话框中将上下左右的距离数值设置的小一些,点击确定。

5、如果此时页面还没有调整到1页,可以选中文字并点击“段落”右侧的方框加箭头图标。

6、在打开的设置段落格式窗口中,将行距选择“固定值”并设置“20磅”点击确定即可。