请教高手：能否通过一种方式，自动为word文档插入一段校验代码？

haitian_98 · 发表于 2006-3-31 17:38

有一个想法，只是不知能否实现。因为公司的word文档需要有权限控制，所以想实现在word文档中增加权限判断的vba代码，但word文档很多，而且为了保证后续的word文档也能增加上这些vba代码，所以希望能有一种方式，比如批处理程序，自动将指定目录下的所有word文档都插入vba代码。〕个人感觉，如果能实现这种方式的话，对大家也许是个启发。还请这里的高人指点。

守柔 · 发表于 2006-4-3 07:00

将你的校验码写入NORMAL.DOT或者新WORD(所谓批处理文档)中的标准模块下,写一段遍历文件夹的代码后,使用关键字OrganizerCopy 进行复制.

有关OrganizerCopy 的方法,可参VBA帮助或者http://club.excelhome.net/viewthread.php?tid=80996&replyID=411522&skin=0

遍历文件夹的方法很多,可搜索本论坛或者见置顶贴子<守柔WORD编程代码集>有.

haitian_98 · 发表于 2006-4-6 17:17

感谢守柔版主的回复，我要先研究消化一下。再次感谢这里的朋友！

haitian_98 · 发表于 2006-4-19 01:49

前几天一直较忙，今天仔细考虑了一下原来提出的问题。我的想法是分两步解决：

第1步、先实现在一个word文档中，对文档内容的自动删除；

第2步、将在第1步中的vba代码通过命令自动加到需要的word文档中；

现在在解决1、的过程中，有两点疑问，想请大家指教：

问题一、如果将删除文档正文的vba代码放到open事件中，必须要求宏的安全级别为低，否则就不执行，想问问有没有通过程序控制安全级别的方法；

问题二、如果不能自动控制word文档的安全级别，有没有其它方式，让word文档一打开，就必须执行一段校验代码？

我把自己做的一个简单的例子上传，还望大家指点。

6IJhwaul.rar (10.2 KB, 下载次数: 11)

[此贴子已经被作者于2006-4-19 1:52:13编辑过]

haitian_98 · 发表于 2006-4-20 14:25

请多指教！

haitian_98 · 发表于 2006-4-24 17:31

没人回答，自己顶一下。版主能否关注一下我的问题？

		自动登录	找回密码
密码			免费注册