为什么我的AUTOEXEC SUB 不能启动 在七楼是原码。
时间:2005-06-11
来源:互联网
我是从VB所编的软件,后台启动Word并加载了特定模板取得成功,可是设在特定模板中Thisdocument中的AUTOEXEC SUB()无法启动。为什么这样呢?将他放在WORD\startup中也不能启动。。可是却可以手工启动为会呢????
极度郁闷中************************************
[此贴子已经被作者于2005-6-14 8:25:22编辑过]
作者: dzdoc 发布时间: 2005-06-11
放在位置好像不对啊!应该是startup下,在windows下,它是隐含的!
你好像还可以用启动时加启动 "/m yournormal"
或试试下面的autoexec看看!
sub autoexec()
docmenut.add temple:"c:\progrom...\temple.dot",'此处的位置是你的机子位置啊!
newtemple:=false
end sub
作者: konggs 发布时间: 2005-06-11
你的位置不对啊!
作者: konggs 发布时间: 2005-06-11
引用:
以下是引用konggs在2005-6-11 10:27:00的发言:放在位置好像不对啊!应该是startup下,在windows下,它是隐含的!
你好像还可以用启动时加启动 "/m yournormal"
或试试下面的autoexec看看!
sub autoexec()
docmenut.add temple:"c:\progrom...\temple.dot",'此处的位置是你的机子位置啊!
newtemple:=false
end sub
不是要加载模板,我是通通在VB中后台启动后,加了特定模板,而且成功了。现的问题是这个模板中的AUTOEXEC SUB()无法启动,应为我想通过他加载一个DLL。
作者: dzdoc 发布时间: 2005-06-11
大哥在哪?出来顶一下,小弟无能为力了!
对不起!理解错误!抱歉!
作者: konggs 发布时间: 2005-06-11
其实你自己可以搜索一下嘛。
再者说了,你如果真心想解决问题的,至少得把代码稍微附上一点吧?难道让我们“隔山打老牛”不成?
请参:
Sub AutoExec()……
End Sub
我不知道是否是你的宏名搞错了?
作者: 守柔 发布时间: 2005-06-11
对不起,下面是我的代码:
Sub AutoExec()Dim PathDll As StringPathDll = ThisDocument.Path & "\epdll.dll"Me.VBProject.References.AddFromFile PathDllMsgBox "丁中化学组 欢迎你"End Sub
下面是在VB中后台启动WORD的代码
Private Sub Form_Load()
Dim WordApp As ObjectSet WordApp = CreateObject("Word.Application")WordApp.Visible = TrueWordApp.AddIns.Add FileName:=App.Path & "\hxjp_user.dot", Install:=TrueWordApp.Documents.Add , False, wdNewBlankDocument, TrueWord.Application.Documents(1).ActivateSet WordApp = NothingEnd Sub
还有就是我只有一个AUTOEXEC放在了HXJP_USER.dot 的THISDOCUMETN中。
[此贴子已经被作者于2005-6-11 20:13:42编辑过]
作者: dzdoc 发布时间: 2005-06-11
作者: 偏爱代码 发布时间: 2011-03-11
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28