澳门赌场

多个Word文档归并和一个word文档怎样拆分红多个(按标题款式和按页拆分)

亮术网 2020-03-05 本网首创

在 Word 中,可用拔出文件的方式把多个文件归并为一个文件,只要一次把一切要归并的文档拔出到一个文档中保管便可。

一个 Word 文档也能够拆分为多个,方式有两个,一个是按标题款式拆分,另一个是用宏 VBA 拆分。按标题款式拆分须要在拆分处设置一种标题款式,而后进入纲领视图拆分。用宏拆分可按页拆分,即每页拆分为一个文档,也可按分节符或指定页数拆分。

 

一、多个Word文档归并为一个文档

翻开一个要归并的Word文档,把光标定位到文档前面,挑选“拔出”选项卡,单击“工具”右侧的指向下的箭头,在弹出的菜单中挑选“在文件中的笔墨”,翻开“拔出文件”窗口,定位到要归并文档地点的文件夹,用鼠标选中除已翻开文档外的一切要归并的文档(若是它们连在一路,选中第一个后,按住 Shift 键,单击最初一个便可选中;若是它们不持续,选中一个后,按住 Ctrl 键,一个个单击),单击“拔出”,则所选文档被顺次增加到第一个文档后,按 Ctrl + S 保管便可。演示如图1所示:

多个Word文档归并为一个文档

图1

 

 

二、一个Word文档怎样拆分红多个

假设要把文档中的“三、四”两局部拆分为自力文档。选中“三”局部的标题,按住 Ctrl,再选中“四”局部的标题,单击“起头”选项卡下的“标题 1”,给它们设置该款式。挑选“视图”选项卡,单击“纲领”进入纲领视图,单击“三”前的加号小图标,按住 Shift,再单击“四”前的加号小图标,把这两局部选中。单击“显现文档”,再单击“建立”,则把“三、四”两局局部别建立为自力文档。单击“封闭纲领视图”加入纲领视图,按 Ctrl + S 保管,已天生两个文档。演示如图2所示:

一个Word文档怎样拆分红多个

图2

提醒:要把那局部拆分为自力文档,只要把它的标题利用一种标题款式,而后在纲领视图当选中要拆分的内容,就能够把它们拆分了。

 

 

三、用宏 VBA 按页拆分word文档

用 Word 翻开要拆分的文档,按 Alt + F11,翻开宏代码编辑窗口,单击“拔出”,在弹出的菜单中挑选“模块”,新建一个模块,把以下代码:

Option Explicit

Sub SplitPageAsADocument()

  Dim i As Integer

  Dim srcDoc As Document, newDoc As Document

  Dim srcDocName As String, newDocName As String

  Dim objRange As Range

  Dim fso As Object

  Set fso = CreateObject("Scripting.FileSystemObject") '建立一个文件工具

  Set srcDoc = ActiveDocument

  Set objRange = srcDoc.Content

  objRange.Collapse wdCollapseStart

  objRange.Select

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

    srcDoc.Bookmarks("\page").Range.Copy

    srcDoc.Windows(1).Activate

    Application.Browser.Target = wdBrowsePage

    Application.Browser.Next

    srcDocName = srcDoc.FullName

    newDocName = fso.BuildPath(fso.GetParentFolderName(srcDocName), _
fso.GetBaseName(srcDocName) & _ & i & . & fso.GetExtensionName(srcDocName)) '天生新文档称号

    Set newDoc = Documents.Add '建立一个新文档

    Selection.Paste

    newDoc.SaveAs newDocName

    newDoc.Close False

  Next

  Set newDoc = Nothing

  Set objRange = Nothing

  Set srcDoc = Nothing

  Set fso = Nothing

  MsgBox "实现。"

End Sub

复制到所建的模块窗口,单击“运转”,在弹出的菜单中挑选“运转宏”(或按 F5)履行代码,一会后,拆分实现,拆分后的文档被保管在原文档地点的文件夹。

本文稀释标签:归并拆分Word