我正在做一個Excel應(yīng)用程序，需要從數(shù)據(jù)庫中更新大量數(shù)據(jù)，因此需要時間。我想在用戶窗體中創(chuàng)建一個進度條，并在數(shù)據(jù)更新時彈出。我要的條形圖只是一個藍(lán)色的小條形圖，它左右左右移動，重復(fù)直到更新完成，不需要任何百分比。我知道我應(yīng)該使用該progressbar控件，但是我嘗試了一段時間但無法成功。編輯：我的問題是與progressbar控件，我看不到欄'進度'。窗體彈出時，它就完成了。我使用了一個循環(huán)，DoEvent但是沒有用。另外，我希望該過程可以重復(fù)運行，而不僅僅是一次。
3 回答
慕桂英546537
TA貢獻1848條經(jīng)驗 獲得超10個贊
有時，狀態(tài)欄中的一條簡單消息就足夠了：
使用VBA在Excel狀態(tài)欄中的消息
這很容易實現(xiàn)：
Dim x As Integer
Dim MyTimer As Double
'Change this loop as needed.
For x = 1 To 50
' Do stuff
Application.StatusBar = "Progress: " & x & " of 50: " & Format(x / 50, "0%")
Next x
Application.StatusBar = False
添加回答
舉報
0/150
提交
取消