Anyone know how to have a userform display and update it's text?
Label1 = "Prioritizing" Call prioritizeme There are several other calls, however the syntax is identical.
The following commands seem to do the trick: This is not directly answering your question at all, but simply providing an alternative.
I've found in the many long Excel calculations most of the time waiting is having Excel update values on the screen.
The part I highlighted in red makes it appear that the first blank cell will always occur in the range "H3: CU129", not "A3: CU129"... Also, when there is "first blank", will it always be in the same column (if yes, which column)? However any of the cells in column B, E, F, G may also contain blanks.
It's just an idea for you to try, and its effectiveness is pretty dependent on your sheet and calculations.
Status Bar = Format(fraction Done, "0%") & " done..." ''// or, alternatively: ''// status Range.value = Format(fraction Done, "0%") & " done..." ''// Some code....... Display Status Bar = boo Status Bar State ''//Reset Status bar display setting Application.
Status Bar = False ''//Return control of the Status bar to Excel Application.
But the screen doesn't refresh, or stops refreshing at some point (e.g. The task eventually completes but the progress bar is useless. For i=1 to imax ' imax is usually 30 or so fraction Done=cdbl(i)/cdbl(imax) Application.
Status Bar = Format(fraction Done, "0%") & "done..." ' or, alternatively: ' status Range.value = Format(fraction Done, "0%") & "done..." ' Some code.......