一、word文档模版替换
1. 制作或下载你要替换的Nomal.dot文件,把它命名为Nomal2.dot2. 打开C:\Documents and Settings\用户名\Application Data\Microsoft\Templates,会看到Nomal.dot文件3. 将Nomal2.dot复制到此目录4. 鼠标选中Nomal.dot,按F2,将其重命名为oldNomal.dot5. 鼠标选中Nomal2.dot,按F2,将其重命名为Nomal.dot替换成功!之后在电脑的任何地方用鼠标右键新建的word文档,都会是你所替换提供的了。
二、批处理替换word模板
wordapp = CreateObject("Word.Application")
tpl_path = wordapp.NormalTemplate.Path & "\"
Set FS = CreateObject("Scripting.FileSystemObject")
script_path = fs.GetParentFolderName(WSH.ScriptFullName) & "\"
if wordapp.version > "11.0" then ' > 11.0 为 Word 2003以上版本
FS.Copy(script_path & "normal.dotx", tpl_path & "normal.dotx")
else
FS.Copy(script_path & "normal.dot", tpl_path & "normal.dot")
end if把上面代码保存为copytmpl.vbs,放在U盘模板目录即可。
需要复制的文件,请添加类似的行就好了。
转载请注明出处51数据库 » npoi操作word模板替换