help：VBA+EXECL “发现二义性的名称：auto_open” 是怎么回事？？？在线等待。。。

[lhy_sun188]

每次打开execl时都会出现
“发现二义性的名称：auto_open”
的提示。
而且，会出现好几个StartUp_2、StartUp_3、StartUp_4、StartUp_5的模块。每打开一次，就会多一个StartUp_n。
这是为什么呢？？？
在线等待大侠们。。。。。。。。。。。

[chinaboyzyq]

模块1里有代码吗？

[jhone99]

[Quote=引用 14 楼 lhy_sun188 的回复:]
引用 13 楼 jhone99 的回复:
我猜你每个StartUp_n里都有auto_open

StartUp_n问题解决了，auto_open问题应该也会解决

对啊。start_n怎么解决呢？？？？？？？？
等待中。。。。。。。。。。。。。。。。
[/Quote]

猜可能saveas导致的，改成 save

[lhy_sun188]

[Quote=引用 15 楼 chinaboyzyq 的回复:]
模块1里有代码吗？
[/Quote]

有代码。

[lhy_sun188]

[Quote=引用 16 楼 jhone99 的回复:]
引用 14 楼 lhy_sun188 的回复:
引用 13 楼 jhone99 的回复:
我猜你每个StartUp_n里都有auto_open

StartUp_n问题解决了，auto_open问题应该也会解决

对啊。start_n怎么解决呢？？？？？？？？
等待中。。。。。。。。。。。。。。。。


猜可能saveas导致的，改成 save
[/Quote]


改成save就编译错误。

[jhone99]

ActiveWorkbook.Save

[jhone99]

ActiveWorkbook.SaveAs (Application.StartupPath & "\" & "StartUp.xls")

Workbooks("StartUp.xls").Save
**********************************

怎么两个？

[lhy_sun188]

[Quote=引用 20 楼 jhone99 的回复:]
ActiveWorkbook.SaveAs (Application.StartupPath & "\" & "StartUp.xls")

Workbooks("StartUp.xls").Save
**********************************

怎么两个？
[/Quote]
具体怎么回事我也不清楚。不过应该不是这里的错误。
因为我将原execl中所有东东，都拷贝到新建的execl中。新建的execl不会出现“二义性：auto_open”的错误。而且，新的execl中的StartUp中的代码和原来的相同。

[jhone99]

不应该用 saveas 应该用save

[jhone99]

我猜你每个StartUp_n里都有auto_open

StartUp_n问题解决了，auto_open问题应该也会解决

[lhy_sun188]

[Quote=引用 24 楼 jhone99 的回复:]
你新拷贝的文件名称不同（或路径不同），不会是Application.StartupPath & "\" & "StartUp.xls"，当然不会出这个错误，反而原来的文件下又多了
[/Quote]
no，不是这样的。

[lhy_sun188]

dinggggggggggggggggggggggggggggggggggggggggggggggg

[jhone99]

email: [e-mail]

[lhy_sun188]

[Quote=引用 27 楼 jhone99 的回复:]
email: [e-mail]
[/Quote]
什么意思大哥？我不能发email。的。公司机密。

[jhone99]

你可以把数据去掉

[jhone99]

新拷贝的StartUp_n只是一个吧，如果是这样的，当然不会出现“二义性：auto_open”的错误

但经过你操作saveas后，就变成多个StartUp_n，就会出现“二义性：auto_open”的错误

[lhy_sun188]

[Quote=引用 29 楼 jhone99 的回复:]
你可以把数据去掉
[/Quote]

抱歉大哥，我这里只能上公司内网，外网是上不去的。也不能往外发邮件。
哎。。。。。。。。。。。。。。。悲哀啊。。。。。。。。。

[lhy_sun188]

[Quote=引用 22 楼 jhone99 的回复:]
新拷贝的StartUp_n只是一个吧，如果是这样的，当然不会出现“二义性：auto_open”的错误

但经过你操作saveas后，就变成多个StartUp_n，就会出现“二义性：auto_open”的错误
[/Quote]
好像不是这样的。新拷贝的文件一个StartUp。而且保存多次也不会出现StartUp_n。也不会出现如下错误：

[size=16px]我感觉是execl或VBA哪里设置错了。至今未找到根本原因。[/size]

[jhone99]

你新拷贝的文件名称不同（或路径不同），不会是Application.StartupPath & "\" & "StartUp.xls"，当然不会出这个错误，反而原来的文件下又多了

[manpuku]

这东西你定义了两次或者和其他的控件啊 变量什么的重名了把 查找一下试试

[lhy_sun188]

dingggggggggggggggggggggggggg