[已解决]VBA中Application的相关问题

Gump2002 · 发表于 2022-9-1 16:59

Sub statusbar()

oldstatusbar = Application.DisplayStatusBar

Application.DisplayStatusBar = True

Application.statusbar = "system is computing,please waiting"

End Sub

请问高手，本人在自学VBA，学到了Applicants对象部分，照着书中的例子编了个如上的小程序，是有关改变状态栏显示内容的，但每次运行都显示“编译错误，方法和数据成员未找到”，其它类似的Application程序都有这样的显示，不知道为什么，请指教。

最佳答案

砂海

2022-9-1 18:51

Excel 2010 , 测试结果正常.

砂海 · 发表于 2022-9-1 18:51

Excel 2010 , 测试结果正常.

Gump2002 · 发表于 2022-9-2 08:44

多谢。

Gump2002 · 发表于 2022-9-7 17:27

Gump2002 发表于 2022-9-2 08:44
多谢。

您好，我的是在模块里放着呢，是不是我放的位置不对啊？

Gump2002 · 发表于 2022-9-8 16:02

砂海发表于 2022-9-1 18:51
Excel 2010 , 测试结果正常.

您好，我的是在模块里放着呢，是不是我放的位置不对啊？

砂海 · 发表于 2022-9-8 17:50

发附件

Gump2002 · 发表于 2022-9-9 14:37

砂海发表于 2022-9-8 17:50
发附件

您好，原始程序在模块8中，我是先运行模块中的application中程序出现如上问题后，再运行模块8的程序后也出现了同样问题。但是现在把模块application删除后单独运行模块8的程序竟然能正常运行了，不知何故？

砂海 · 发表于 2022-9-9 18:15

"Application" 作为你的模块名 , 那系统的"Application" 怎么办?

这就像给娃起名【林业局, 水务局 , 车管所】

Gump2002 · 发表于 2022-9-13 09:24

砂海发表于 2022-9-9 18:15
"Application" 作为你的模块名 , 那系统的"Application" 怎么办?

这就像给娃起名【林业局, 水务局 ...

但是把模块application的名称更改后，里面的程序问题依然存在，请问是什么原因。

Gump2002 · 发表于 2022-9-13 15:22

砂海发表于 2022-9-9 18:15
"Application" 作为你的模块名 , 那系统的"Application" 怎么办?

这就像给娃起名【林业局, 水务局 ...

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