如何将word文档按页码拆分
请参考我回答其它朋友的方案:http://zhidao.baidu.com/question/118581756.html不过那个是按单页拆分的。
如果想按照指定页数拆分,请使用下面的代码,其它步骤和原来那个方案相同。
Option ExplicitSub SplitEveryFivePagesAsDocuments()Dim oSrcDoc As Document, oNewDoc As DocumentDim strSrcName As String, strNewName As StringDim oRange As RangeDim nIndex As Integer, nSubIndex As Integer, nTotalPages As Integer, nBound As IntegerDim fso As ObjectConst nSteps = 200 ' 修改这里控制每隔几页分割一次Set fso = CreateObject("Scripting.FileSystemObject")Set oSrcDoc = ActiveDocumentSet oRange = oSrcDoc.ContentnTotalPages = ActiveDocument.Content.Information(wdNumberOfPagesInDocument)oRange.Collapse wdCollapseStartoRange.SelectFor nIndex = 1 To nTotalPages Step nStepsSet oNewDoc = Documents.AddIf nIndex + nSteps >nTotalPages ThennBound = nTotalPagesElsenBound = nIndex + nSteps - 1End IfFor nSubIndex = nIndex To nBoundoSrcDoc.ActivateoSrcDoc.Bookmarks("\page").Range.CopyoSrcDoc.Windows(1).ActivateApplication.Browser.Target = wdBrowsePageApplication.Browser.NextoNewDoc.ActivateoNewDoc.Windows(1).Selection.PasteNext nSubIndexstrSrcName = oSrcDoc.FullNamestrNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _fso.GetBaseName(strSrcName) & "_" & (nIndex \ nSteps + 1) & "." & fso.GetExtensionName(strSrcName))oNewDoc.SaveAs strNewNameoNewDoc.Close FalseNext nIndexSet oNewDoc = NothingSet oRange = NothingSet oSrcDoc = NothingSet fso = NothingMsgBox "结束!"End Sub
WORD文档如何将一个表格拆分成两个?
展开全部 1、在Word文档中插入一个5行4列的表格,在其下方至少保留两个回车符,如下图所示。
2、从表格中选中要成为第2个表格的行和列,然后将其整体拖动到第2个回车符中即可,如下图所示。
3、将鼠标指针移到第2个表格上,此时表格的左上角出现形状,将鼠标指针移到该标记上,待鼠标指针呈十字形状时,按住鼠标左键将其拖动到第1个表格的后面,如下图所示。
4、此时会发现刚拆分的两个表格在水平方向上不是对齐的,选中第2个表格,单击鼠标右键,从弹出的快捷菜单中选择【表格属性】菜单项,如下图所示。
5、打开【表格属性】对话框,切换到【表格】选项卡;?然后单击【定位】按钮,如下图所示。
6、打开【表格定位】对话框,在【垂直】组合框的【位置】文本框中输入合适的数值,如下图所示。
7、依次单击【确定】按钮即可。
...
怎么把1个word分成两份?
方法如下:1、打开需要进行编辑的word文档;2、点击菜单栏->视图;3、单击之后会在视图下方出现一个子菜单,点击"拆分";4、点击后,就会出现一个让你确定需要拆分的文档位置;5、确定自己的拆分位置后,鼠标左键单击就可以将文档拆分;6、完成。
word文档中如何使用快捷键拆分单元格?
步骤如下:1.打开word文档,点击“视图”选项下的“拆分”;2.点击后,鼠标变成分隔线;3.通过鼠标移动到要拆分的位置,左键即可。
word中如何拆分单元格(等份)?
步骤如下:1.打开word文档后,插入2厘米的正方形单元格;2.选中表格,在表格工具下布局选项中,点击“拆分单元格”;3.在弹出的“拆分单元格”对话框里,输入要拆分的行列数(例1列10行)即可。
word中的拆分功能有什么作用?在什么情况下用?
1、先打开word文档,在功能区域中选中“视图”。
2、在“窗口”功能组中选择“拆分”,如下图。
3、点击“拆分”后,发现鼠标由指针变成了长长的可拆分的样子。
4、在将鼠标移至需要拆分的地方,点击鼠标左键,就可以把文档一分为二了。
5、这样,就可以分别在两个窗口中,滑动滚动条,找到需要的内容,可以进行不同位置的文档比较,或者复制粘贴就更容易,不用在大片文档中来回滚动了。
6、如果不需要使用拆分功能,可以在“视图”中点击“取消视图”即可退出,退出就还原为原来的文档。
如何把WORD拆分成多个文档,并且生成的文档自动以第一行作为文件...
1、视图——大纲,切换到大纲视图,选中要拆分的标题及正文(选定的方法是鼠标移到该标题前的空心十字符号,此时鼠标指针变成十字箭头,单击鼠标即可选定该标题包括的内容)2、单击【大纲】工具栏中的【创建子文档】按钮,每个子文档会放在一个虚线框中,并且在虚线框的左上角显示一个子文档图标,子文档之间用分节符隔开。
3、把文件保存下来即可。
Word 在保存主文档的同时,会自动保存创建的子文档,并且以子文档的第一行文本作为文件名。
转载请注明出处51数据库 » word怎么把文件拆分