Solved: Do Events

[philfer]

I have a procedure that takes a while to run and I am trying to use a UserForm with a label that starts with width zero and increases with each iteration of the loop.

I use pctDone (dim as single) = counter/totalrows

Then userform.Show
With Userform
.frameProgress.Caption = Format (pctDone,"0%")
.labelProgress.Width = pctDone * . frameProgress.Width
End With

The code I "copied" then uses "Do Events" which when I type into Excel, it raises an eyebrow and looks at me as if to say "amateur"

Is there a new way to say "Do Events"

Is there anything else wrong with what I'm doing

Please help

[Bob Phillips]

DoEvents