vba 程序开始运行至结束时间倒计时，代码怎么写？

[weixin_42306181]

想要实现的效果是，在窗体上显示程序开始执行到结束时间的倒计时。当程序程序没有执行完时，怎么获取到程序执行需要多长时间？谢谢

[大叔obnijeh]

引用 楼主 weixin_42306181 的回复:

想要实现的效果是，在窗体上显示程序开始执行到结束时间的倒计时。当程序程序没有执行完时，怎么获取到程序执行需要多长时间？谢谢

假如程序要调用5个函数，程序预估执行时间为5分钟， 第一个函灵敏执行完成后，就调用时间进度”,显示还剩4分钟， 第二个函数执行完后，调用时间进度”，显示 还剩3分钟， 第三个函数执行完后，调用时间进度”，显示还有2分钟（当然，这个时间你可能会问，能不能显示细一点？可以的，在函数中间还有可以分，比如第三个函数在中间插一段“调用时间进度1”“调用时间进度2”，执行的调用时间进度1”时，显示还剩2分30秒）， 同理执行第4个函数就可以更加细分了。"调用时间进度”可以参考VB这个进度条相关操作来实现。

[weixin_42306181]

感谢指点，我试一下

[大叔obnijeh]

引用 1 楼 大叔obnijeh 的回复:

[quote=引用 楼主 weixin_42306181 的回复:]想要实现的效果是，在窗体上显示程序开始执行到结束时间的倒计时。当程序程序没有执行完时，怎么获取到程序执行需要多长时间？谢谢

假如程序要调用5个函数，程序预估执行时间为5分钟， 第一个函灵敏执行完成后，就调用时间进度”,显示还剩4分钟， 第二个函数执行完后，调用时间进度”，显示 还剩3分钟， 第三个函数执行完后，调用时间进度”，显示还有2分钟（当然，这个时间你可能会问，能不能显示细一点？可以的，在函数中间还有可以分，比如第三个函数在中间插一段“调用时间进度1”“调用时间进度2”，执行的调用时间进度1”时，显示还剩2分30秒）， 同理执行第4个函数就可以更加细分了。"调用时间进度”可以参考VB这个进度条相关操作来实现。[/quote] 我又特意为你写了一个小程序，代码及运行效果已写到我的博客里，去我的博客看看。https://blog.csdn.net/obnijeh/article/details/109974995

[大叔obnijeh]

https://blog.csdn.net/obnijeh/article/details/109974995

[weixin_42306181]

[weixin_46225922]