一个宏里面有2个循环的情况下，如何使用进度条呢？

kenny81

最近项目上，需要在excel 里做一个进度条，来大约显示处理文件的进度。

在论坛上找了一位大神的例子，照着依样画葫芦。但是我的宏里，因为业务原因，有2个循环。

第1个循环对文件，做一次处理，打开，处理，关闭。

第2个循环，又打开一次，处理，关闭。

如何将这2次循环，用一个进度条，显示出来呢？

我现在只有使用2次进度条，有点傻。

附件是我简化的例子。

请大神们指点一下。多谢了。

kenny81

谁能指点一下吗?谢谢。

xiaocake

为什么要分两次循环，建议把两次循环做的事情写到一个循环里面，去除不必要的代码，减少访问文件的次数，访问文件相对来说是比较慢的。

如果确实一定要有两次循环，把两个循环里面的比例都除2就是了，第一次循环后不卸载窗体，第二次的比例都加上50%，第二次循环完了再卸载窗体。

MOY838840554

这么多文件啊，打扰了。。。

wj2368

。。。。。。。。。。。。。。

wj2368

kenny81 发表于 2018-12-16 23:20
谁能指点一下吗?谢谢。

看楼上附件。。。

kenny81

我下载了附件，解压后，尝试运行，点击 按钮（单次循环，2次循环的，我都点了，报一样的错），就报错了。

报错信息如附件所示，我用的 office 2010。

我看了一下VBA 的代码，似乎增加了以下这句（红色的）是定义了一个全局变量吗？

Public p As Single
Sub sz2()
'
' sz2 宏
'

    '-------------第1次循环 -------------------

wj2368

kenny81 发表于 2018-12-18 17:18
我下载了附件，解压后，尝试运行，点击 按钮（单次循环，2次循环的，我都点了，报一样的错），就报错了。
...

。。。。。。。。。。。。。

kenny81

我再试试吧。谢谢了。