查看单个帖子
旧 2009-04-19, 06:41 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 如何用vba启动excel?

如何用vba启动excel?
www.dimcax.com
如何用vba启动excel?
on error resume next
set excelapp = getobject(, "excel.application")
if err then
err.clear
set excelapp = createobject("excel.application")
if err then
msgbox ("不能运行excel
代码好象不需要修改,但要注意:
1、vba工程需要引用excel对象库,即microsoft excel 9.0 object library(excel
这样就行了!
on error resume next
set excelapp = getobject(, "excel.application")
if err then
err.clear
set excelapp = createobject("excel.application")
if err then
msgbox ("不能运行excel
以下是引用mikewolf2k在4-2-23 20:32:17的发言:
我的意思是要检测到当前没有打开excel时自动打开excel,这段代码应该可以实现该功能,但是它没有.
试试第二贴的代码.
明经:/bbs
晓东:
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)