用ACCESS打开EXCEL文件，EXCEL的加载宏没有运行？

老鬼 · 发表于 2009-3-25 09:58:53

我用如下代码打开EXCEL文件：
Set xlapp = CreateObject("EXCEL.APPLICATION")
xlapp.Visible = True
xlapp.workbooks.Open "h:\sqlCodeQuery.xls"

EXCEL是打开了，但是EXCEL的加载宏却没有运行，为什么呢？

方漠 · 发表于 2009-3-25 10:28:05

本帖最后由方漠于 2009-3-25 10:51 编辑

在xlapp.Visible = True后再加多2句:

xlapp.workbooks.Open "Your.xla"
xlapp.Run "Your.xla!MacroName"

老鬼 · 发表于 2009-3-25 10:59:12

引用了竟然也不能自动运行？谢了！

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[模块/函数] 用ACCESS打开EXCEL文件，EXCEL的加载宏没有运行？

群介绍
主题无相 (随机显示版	同地区群块其他地区)