为Excel文档添加启动屏幕
接下来,将工具箱,A,字大,图标到你的形式,扩大文本框角,当鼠标出现,并与标题内容要显示在文本框后更换。如果你不显示控件属性栏中的VBA编辑器此时,按下它采用F4,所以你可以在属性栏改变字体改变标题的字体,默认字体是这首歌的身体,你也可以点击其画右;hellip;的小框,在弹出的对话框中使用本文复位。字体是宋体黑色一般,72分。接下来,属性textalign柱fmtextaligncenter属性选择forecolor按钮特调色板;选择你喜欢的标题颜色。
有一点需要注意的是,标签文本框中只有一个字体,所以如果你想在弹出框中创建一个副标题,你需要在表单中添加另一个标签文本框。
现在我们需要添加背景颜色对话框:第一,在没有其他控件在窗体中,选择单击鼠标,backcolor,调色板,在属性栏,选择你喜欢的颜色。
您可能还注意到,在窗体的左上角的将肯定不是我们想显示当它跳起来。我们需要修改它的属性列。第一,改变最高名称柱Intro然后选择caption变化如下和userform1您最喜爱的文本(在这种情况下,介绍)。
添加另一个标签,在这个标签中,我们可以使用与前一个不同的字体。
界面设计的下一个阶段只要求我们把一些标签的位置,然后双击窗体(正处于),在代码编辑器中弹出,选择在右上角的下拉菜单;Initialize在代码窗口中;私有子(userform_initialize)和结束;sub在添加以下代码:
应用。时间现在+时间价值(00:00:04,ClearForm);
这个宏可以用来控制标题对话框显示时间。在这个例子中,我将它设置为4秒。当然,你也可以改变00:00:04任何时间你想停止启动屏幕。
选择VBA插入菜单中的模块,并在弹出的代码编辑框中填入以下代码:
Sub ClearForm()
卸下了
端子
在这段代码中的函数形式clearform卸载4秒后在对话框中显示代码中的Intro的形式,刚刚编辑的名字(记住,我们已改变了形式的名称,之前,intro它)。
最后,打开thisworkbook在工程资源管理器;如果你的VBA不显示这个经理,你可以用Ctrl + R转移出来;然后进入它在代码编辑器弹出。
私有子workbook_open()
节目介绍。
端子
按Alt + F11返回原来的Excel工作簿;保存文件。如果是Excel 07版,保存文件后缀为。Xlsm,这样的文件将自动运行文件中定义的宏时,它打开。如果你做这一步一步,下一次你打开该文件,你会看到一个开机箱仅停留4秒。