Excel利用VBA制作进度条加载效果

首先，在Excel界面中，按Alt+F11进入VBA界面，在此创建一个用户窗体。

在此打开“属性”界面，可以将其中“标签”即标题进行重命名。

接下来在用户窗体中放置如图所示的三个标签。

如图所示，我们还可以对标签进行颜色填充，并分别进行命名。

右击文档，从弹出的右键菜单中选择”创建“-”类模块“项，输入如图所示的代码。

接下来我们还需要输入如图所示的代码，用于运行整个代码，完成进度条的创建。

最后重启打开Excel文档 ，就可以查看进度条效果了。