加入收藏 | 设为首页 | 会员中心 | 我要投稿 | RSS
您当前的位置:首页 > 产品展区

如何拆分word文档

时间:2024-02-24 12:37:54  来源:http://www.hongsengmold.com  作者:admin

一、如何拆分word文档

在拆分的地方按Ctrl+Enter,可插入分页符。

二、如何将word文档,按照分节符分解成几个文档呢??

首先,需要保证原文档中各节已经存在标题级别,这可以利用“样式”功能实现。

接下来切换到“视图”选项卡,在这里选择“大纲视图”,你可以按照需要对节进行适当处理;单击“显示文档”按钮,会看到“创建”和“插入”两个功能按钮,将光标定位到包含标题的行,单击“创建”按钮即可自动创建子文档,然后确认保存就可以了

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

可以把需要的部分一下复制剪切,然后把文档另存为,保存起来,再执行粘贴命令,重复操作即可把文档分解为多个文档。

四、怎样将一个word文档按页分解成几个独立的文档

用文档切割机,可按大小把一个文件分成任意大小,

可将同类型人间合并成一个文件。

五、怎样把一个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代表其对应原始文档中的第几页)的文档,检查它们的内容是否就对应于原始文档每个页面的内容。

如文档中有分节符分解后的文档会出现空白页,如要分解后不出现空白页,需要把文档中的分节符删除。消除分节符的方法:

注意事项

分节符若全部替换,要注意替换后文档可能会出现排版混乱,这则需要自己手动排版了。

来顶一下
返回首页
返回首页
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表
推荐资讯
相关文章
    无相关信息
栏目更新
栏目热门