1、在Word里面打开那个需要分割的文档(假设它的文件名叫做“原始文档.doc”);
成都创新互联长期为千余家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为临潭企业提供专业的网站建设、成都网站制作,临潭网站改版等技术服务。拥有10余年丰富建站经验和众多成功案例,为您定制开发。
键入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代表其对应原始文档中的第几页)的文档,检查它们的内容是否就对应于原始文档每个页面的内容。
如文档中有分节符分解后的文档会出现空白页,如要分解后不出现空白页,需要把文档中的分节符删除。消除分节符的方法:
注意事项
分节符若全部替换,要注意替换后文档可能会出现排版混乱,这则需要自己手动排版了。
这样不需要转换,doc就是word文档,但txt格式的文本文档可以转换成doc格式的word文档。其中的具体步骤如下:
1、首先,右击电脑桌面的空白处弹出菜单,选择里面的“新建”选项。
2、然后,在弹出的菜单中选择”文本文档”并点击。
3、等桌面显示新建的文本文档,再点击空白处。
4、右击文本文档,在弹出的界面中点击“属性”。
5、在“属性”里面,可以看到后缀是“新建文本文档.txt”。
6、将其改为“新建文本文档.doc”。
7、在这一步,需要点击“确定”这个按钮。
8、接着,弹出界面提示改变扩展名可能会导致文件不可用,点击“是”就行了。
9、最后,就可以得到doc格式的word文档了,由于txt和doc基本上不会出现冲突,所以直接改后缀名转换过来即可。
wor2007的常见问题,我也遇到,解决方法如下,:
1、打开word文档-点击左上角图标-打开【word选项】-打开【保存】-点击【将此文件格式保存为】-选择想要保存的格式
2、或者使用另存为,存完以后,原文件删除
3、产生的文件夹是微软新设计的思路,在断电或者电脑死机时,不会丢失,建议不修改原设置,使用另存为
看过网上很多创建word文件的办法,大都会要求客户段浏览器设置安全性,有很大的局限性。
经过本人摸索,找到一条目前本人认为最简易的办法,不敢独享,请朋友们点评。
1 利用word生成相应的word文件,如固定格式的表格等,然后用“另存为”功能存成htm格式。
2 使用记事本等打开,可看见html源码。
3 将代码开始处的以下内容:
html xmlns:o="urn:schemas-microsoft-com:office:office"
xmlns:w="urn:schemas-microsoft-com:office:word"
xmlns="";
head
meta http-equiv=Content-Type content="text/html; charset=gb2312"
meta name=ProgId content=Word.Document
meta name=Generator content="Microsoft Word 11"
meta name=Originator content="Microsoft Word 11"
改为基本html代码:
html
head
meta http-equiv=Content-Type content="text/html; charset=gb2312"
4 在页面最开始处添加以下语句:
% Response.ContentType = "application/msword"
response.AddHeader "content-disposition", "inline; filename=测试.doc"
' 此处可添加变量处理等语句,如打开数据库获取记录集等。
'
%
5 在html代码中找到表格中相应位置填入asp变量或数据库字段值。如以下代码代表一个单元格:
td width=114 valign=top style='width:85.2pt;border:solid windowtext 1.0pt;
border-left:none;mso-border-left-alt:solid windowtext .5pt;mso-border-alt:
solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'
p class=MsoNormalspan lang=EN-USo:p /o:p/span/p
/td
可修改为:
td width=114 valign=top style='width:85.2pt;border:solid windowtext 1.0pt;
border-left:none;mso-border-left-alt:solid windowtext .5pt;mso-border-alt:
solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'
p class=MsoNormalspan lang=EN-USo:p /o:p/span/p %=trim(.fields("奖金").value)%
/td
注意%...%中的内容即是要输出的变量或字段值,(废话,ASP人都知道)
6 保存,扩展名由htm改为asp即可。
运行看看,浏览器自动弹出下载对话框,文件名为“测试.doc”,也可直接打开!
此法最大的优点在于多么复杂的word格式表格也能轻松搞定。
缺点是html代码稍有点复杂,表格位置不好找。其实在做word文件时在单元格里输入特殊字符,然后在htm代码中查找该字符就可轻松定位。
go 生成pdf php调用?
排在第二的是gotenberg/gotenberg,这个库主要用于将其他类型的文件转化为PDF,以及合并PDF的,不符合我们的需求,暂不考虑。pdfcpu/pdfcpu 是一个用于合并PDF的命令行工具,也不符合需求,暂不考虑。
signintech/gopdf 初步看着还是比较符合需求,再看一看其他的。
unidoc/unipdf 是unioffice的一个PDF工具,他们还有个比较厉害的用于生成word的库,不过使用需要商业授权,源码也做了混淆,加上文档有限,不是太好用,先不考虑了。
方法如下
1、首先打开word文档,然后点击上方菜单栏的“插入”菜单选项。
2、在菜单选项中,右侧找到“对象”按钮,点击打开。
3、在对象对话框里,点击“由文件创建”选项,点击“浏览”按钮。
4、在对话框里找到需要插入的word文件,点击插入即可。
小技巧
Word中巧输星期
单击“格式→项目符号和编号”,进入“编号”选项卡,单击“自定义”按钮,在“编号样式”栏内选择“一、二、三”等样式,在“编号格式”栏内的“一”前输入“星期”即可。
粘贴网页内容
在Word中粘贴网页,只须在网页中复制内容,切换到Word中,单击“粘贴”按钮,网页中所有内容就会原样复制到Word中,这时在复制内容的右下角会出现一个“粘贴选项”按钮,单击按钮右侧的黑三角符号,弹出一个菜单,选择“仅保留文本”即可。