在当今世界,每个人都喜欢在打开任何文件时在屏幕上显示几秒钟的启动屏幕。大多数人都不知道启动画面。观众一定会留下深刻的印象。

我们需要执行以下步骤:

单击“开发人员”选项卡。从“代码”组中选择“ Visual Basic”

image 1

  • 单击插入,然后单击用户窗体

image 2

用户表单将通过“工具箱”打开;选择标签并在用户表单中绘制

image 3

image 4

  • 将标签框重命名为“我的启动画面”

image 5

要增加字体的大小,请单击“标签”框并右键单击,然后选择“属性

image 6

”。 *从属性窗口;选择字体并单击三个点

image 7

  • 字体对话框将打开

image 8

  • 以您想要的方式选择字体,并将大小增加到20左右以使其更大

image 9

下一步是从“工具箱”中插入“图像”,然后选择“图像”并绘制更大的

image 10

image 11

|右键单击图像并选择属性,然后单击属性

image 12

中的图片菜单中的三个点。 *选择保存图片的路径

image 13

  • 这是用户表单现在的外观

image 14

在“项目”窗格中双击“此工作簿*”

image 15

在VBE中输入以下代码:-

Private Sub Workbook_Open()

UserForm1.Show

结束子

image 16

初始化用户表格;双击除标签或图像之外的用户表单,下面的编码将出现

image 17

将上面的代码替换为以下代码:-

私有子UserForm_Activate()

现在为Application.OnTime + TimeValue(“ 00:00:05”),“ Quitform”

结束子

image 18

现在,我们需要将代码添加到已分配给“用户”表单的“退出表单” *中,以便在5秒钟后激活。

  • 单击插入,然后单击模块

image 19

  • 这将创建新的模块。

  • 在模块

image 20

中输入以下代码*保存文件,然后将其打开。

image 21

通过这种方式,我们可以通过VBA在Microsoft Excel中创建启动画面。