Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 14338|回复: 4

[已解决][求助]如何用VBA制作进度条

[复制链接]
发表于 2009-9-11 08:37 | 显示全部楼层 |阅读模式
请问一下大家,用VBA如何制作出进度条?
最佳答案
2009-9-11 11:53

论坛中这类问题很多,有做在工作表的,也有做在窗体上的……

参考:http://club.excelhome.net/thread-165981-1-1.html

发表于 2009-9-11 11:53 | 显示全部楼层    本楼为最佳答案   

论坛中这类问题很多,有做在工作表的,也有做在窗体上的……

参考:http://club.excelhome.net/thread-165981-1-1.html

回复

使用道具 举报

 楼主| 发表于 2009-9-12 10:45 | 显示全部楼层
回复

使用道具 举报

发表于 2009-9-12 15:10 | 显示全部楼层

'看状态栏

Sub ff()
Dim i, j
For i = 1 To 60
For j = 1 To 6000000
Next
Application.StatusBar = String(i / 5, "■") & String(60 / 5 - i / 5, "□") & " " & Int((i / 60) * 100) & "%"
Next
Application.StatusBar = False
End Sub

回复

使用道具 举报

发表于 2014-12-28 19:20 | 显示全部楼层
什么时候我也能学会VBA呢?
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-6-3 17:59 , Processed in 0.234757 second(s), 8 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表