Excel VBA怎样做起动屏

Excel VBA怎样做启动屏
本帖最后由 qinyi2010 于 2015-04-07 15:40:58 编辑
    最近我用Excel VBA做了个分析系统,因为太大(有5M),启动需要16秒,我希望在全部启动完成之前弹出一个对话框,显示“系统正在启动,请稍后……”的提示,同时后台启动不要停止,那样要人性化一些。我曾经在Open事件中用Userform1.show的方法,但是发现,这个窗体是在启动完成后才弹出,根本达不到目的。
    在此,请问高人们怎样实现这个功能?
------解决思路----------------------
http://www.baigoogledu.com/s.php?hl=zh-CN&q=VBA+splash
Excel VBA怎样做起动屏
------解决思路----------------------
一开始就只显示一个WorkSheet其它都不可见。
启动完后,切换 Visible 属性。
------解决思路----------------------
用一个空白的工作簿作为启动页,启用一个定时器来加载你的主工作簿......
------解决思路----------------------
引用:
    最近我用Excel VBA做了个分析系统,因为太大(有5M),启动需要16秒,我希望在全部启动完成之前弹出一个对话框,显示“系统正在启动,请稍后……”的提示,同时后台启动不要停止,那样要人性化一些。我曾经在Open事件中用Userform1.show的方法,但是发现,这个窗体是在启动完成后才弹出,根本达不到目的。
    在此,请问高人们怎样实现这个功能?

5M文件,打开要16秒,你是怎样读取文件的?
------解决思路----------------------
如果你读取数据的方法没有问题,建议你Open事件中仅打开Userform1,而读取数据都放到Userform1上的按钮事件中
------解决思路----------------------
换个思路吧 写个VB程序 用这个VB打开EXCEL的同时显示启动屏 就OK啦 ^^
------解决思路----------------------
引用:
Quote: 引用:

5M文件,打开要16秒,你是怎样读取文件的?

这是一个Excel2007的文件其中大部分都是用本身的函数做的,双击打开它自己读取。

不知道你怎样读取的,不同的方法速度相差大,前段时间看书,说相差达10倍。
我现在尽量少用对象和ADO读取数据。