vb中Set xylapp = CreateObject("Excel.Appliaction")出现错误,Active 控件不能创建对象,实时错误429,

Set xylapp = CreateObject("Excel.Appliaction")

首先通过VB的菜单[工程] -- [引用],勾选:Microsoft Excel XX.0 Object Library
其中 XX 的具体值,要看你计算机安装的OFFICE版本而定
我的是Excel 2003 的,所以是 11.0
另外,你的这个语句,我复制到我的电脑,确实也出这样的提示,奇怪,找不到错在那里
我重新输入一遍就可以执行了,你复制我下面的看看,但是我看不出来,错在哪里

Set xylapp = CreateObject("Excel.Application")

但是,肯定这句语句与你的不一样,因为我复制在记事本,用查找的方法,只能找到一个.
终于看出来了, 你这个 Appliaction 拼错了 应该是 Application !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
a和c的位置搞错了呀!!!!!!
温馨提示:内容为网友见解,仅供参考
第1个回答  2013-01-09
Set xylapp = CreateObject("Excel.Application")
如有必须,请再详述问题。来自:求助得到的回答
第1个回答  2013-01-09
无需引用,你检查一下变量类型,下面语句不出错:
Dim xlApp As Object
Set xlApp = CreateObject("Excel.Application")
第2个回答  2013-01-09
这个语句使用的前提是安装了Excel,不知道你的机器安装了没有。如果留下个QQ的话我可以帮你看看。

vb中Set xylapp = CreateObject("Excel.Appliaction")出现错误,Active...
我重新输入一遍就可以执行了,你复制我下面的看看,但是我看不出来,错在哪里 Set xylapp = CreateObject("Excel.Application")但是,肯定这句语句与你的不一样,因为我复制在记事本,用查找的方法,只能找到一个.终于看出来了, 你这个 Appliaction 拼错了 应该是 Application !!!a和c的位置搞错了呀!

相似回答