我的Excel工具執行的任務很長,我正在嘗試通過在狀態欄中或工作表中某些單元格中提供進度報告來對用戶友好,如下所示。但是屏幕不刷新,或在某個時候停止刷新(例如33%)。任務最終完成,但是進度欄沒有用。我該怎么做才能強制更新屏幕?For i=1 to imax ' imax is usually 30 or so fractionDone=cdbl(i)/cdbl(imax) Application.StatusBar = Format(fractionDone, "0%") & "done..." ' or, alternatively: ' statusRange.value = Format(fractionDone, "0%") & "done..." ' Some code.......Next i我正在使用Excel 2003。
請問如何在Excel VBA中強制屏幕更新
幕布斯6054654
2020-01-05 08:00:05