置为4秒钟。当然你也可以将000004改成任何你想让启动画面停留的时间。
选择VBA插入菜单中的“模块”。并在弹出的代码编辑框内填入下面代码：SubClearFormU
loadI
troE
dSub这段代码中的ClearForm函数在对话框显示4秒后卸载掉该窗体。代码中的“I
tro”就是刚才编辑的窗体名称还记得之前咱们已经将窗体名称更改为“I
tro”了吗。
f最后在工程资源管理器那里点开“ThisWorkBook”如果你的VBA没有显示这个管理器，可以用CTRLR将它调出接着在弹出的代码编辑器里面输入：PrivateSubWorkbook_Ope
I
troShowE
dSub按下ALTF11返回到原来的Excel工作簿当中保存文件。如果是07版的Excel，请将文件后缀保存为xlsm，这样打开该文件时将会自动运行文件中定义的宏。如果你按照前面所述一步步完成，下次你再打开这个文件，便会见到一个只停留4秒的启动框。
fr