怎么把word文档拆分成两个 一个word文件怎么拆分成多个文件

一个word文件怎么拆分成多个文件  

一个word文件怎么拆分成多个文件, 如何把一个word文件拆分为多个小文件

把一个word文件拆分为多个小文件的方法：
1.开启要处理的WORD文件，然后ALT+F8调出巨集处理视窗，新输入巨集名称为MyPg。
2.点选右侧的编辑按钮，输入如下内容，完成后键盘F5即可。
3.贴上如下内容
Option Explicit
Sub MyPg()
Dim oSrcDoc As Document, oNewDoc As Document
Dim strSrcName As String, strNewName As String
Dim oRange As Range
Dim nIndex As Integer, nSubIndex As Integer, nTotalPages As Integer, nBound As Integer
Dim fso As Object
Const nSteps = 200 ' 修改这里控制每隔几页分割一次
Set fso = CreateObject("Scripting.FileSystemObject")
Set oSrcDoc = ActiveDocument
Set oRange = oSrcDoc.Content
nTotalPages = ActiveDocument.Content.Information(wdNumberOfPagesInDocument)
oRange.Collapse wdCollapseStart
oRange.Select
For nIndex = 1 To nTotalPages Step nSteps
Set oNewDoc = Documents.Add
If nIndex + nSteps > nTotalPages Then
nBound = nTotalPages
Else
nBound = nIndex + nSteps - 1
End If
For nSubIndex = nIndex To nBound
oSrcDoc.Activate
oSrcDoc.Bookmarks("page").Range.Copy
oSrcDoc.Windows(1).Activate
Application.Browser.Target = wdBrowsePage
Application.Browser.Next
oNewDoc.Activate
oNewDoc.Windows(1).Selection.Paste
Next nSubIndex
strSrcName = oSrcDoc.FullName
strNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _
fso.GetBaseName(strSrcName) & "_" & (nIndex nSteps + 1) & "." & fso.GetExtensionName(strSrcName))
oNewDoc.SaveAs strNewName
oNewDoc.Close False
Next nIndex
Set oNewDoc = Nothing
Set oRange = Nothing
Set oSrcDoc = Nothing
Set fso = Nothing
MsgBox "结束！"
End Sub
此方法适用于页码分多个文件使用。

1、检视——大纲，切换到大纲检视，选中要拆分的标题及正文（选定的方法是滑鼠移到该标题前的空心十字元号，此时滑鼠指标变成十字箭头，单击滑鼠即可选定该标题包括的内容）
2、单击【大纲】工具栏中的【建立子文件】按钮，每个子文件会放在一个虚线框中，并且在虚线框的左上角显示一个子文件图示，子文件之间用分节符隔开。
3、把档案储存下来即可。Word 在储存主文件的同时，会自动储存建立的子文件，并且以子文件的第一行文字作为档名。

一个word文件中的东西怎么分成多个文件

方法如下：
1、开启需要进行编辑的word文件；
2、点选选单栏->检视；
3、单击之后会在检视下方出现一个子选单，点选"拆分"；
4、点选后，就会出现一个让你确定需要拆分的文件位置；
5、确定自己的拆分位置后，滑鼠左键单击就可以将文件拆分；
6、完成。

怎么将pdf合并文件分开拆分成多个PDF文件

拆分PDF格式档案需要使用到专业性的软甲，下面答主就为大家介绍一款操作简单的PDF拆分软体！
参考软体：迅捷PDF编辑器
拆分步骤：
首先我们点选PDF编辑器左上角的“档案”按钮并将PDF档案开启！
档案开启之后点选“文件”中的“拆分文件”功能进入到拆分介面！
在拆分介面设定好PDF拆分引数后点击“确定”按钮即可拆分PDF档案！
以上就是拆分PDF档案的方法，看完之后是不是觉得特别简单呢！

Word怎么将一个文件拆分成几个小文件

1、开启需要拆分的文件，文件里面输入内容。2、以大纲检视显示文件，点选【检视】再点选【大纲检视】3、在需要拆分的地方的标题处，设定“级别”如图4、选中要拆分出来的文件（含带级别的标题）。将滑鼠移动到标题前的空心十字元号上，此时滑鼠指标变成十字箭头，点选滑鼠即可选定该标题以及其包括的内容。5、开启文件操作，点选“显示文件”，展开相应文件操作按钮；点选“建立”按钮，建立子文件；6、点选“选单”按钮，弹出“另存为”对话方块，即可生成以“设定了级别的标题”为档名的子文件；

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

1、在Word里面开启那个需要分割的文件；
2、键入ALT+F11开启VBA编辑器，选择选单“插入-模组”；
3、复制贴上下面的程式码：
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
4、按“F5”执行，看到“完成！”结束。
5、检查当前文件所在路径下是否生成若干名为“原文件名_n.doc”（n代表其对应原始文件中的第几页）的文件，检查它们的内容是否就对应于原始文件每个页面的内容。