been playing with the progressbar form j-walk.com. Some loops cycle through over 4000 items, and the analysis time for this using the progressbar had increased by 10x - which of course is not surprising - but is a very nice indicator that things are actually progressing... Can anyone suggest a modification that will only get the progressbar to update itself as given increments are reached - maybe either at every 20th iteration etc - that way could find a nice compromise between some slowing of analysis and visual aid. Is there a function that would be "true" if the value of 'i' was an exact multiple of 10 etc ??
Many thanks in advance.

For i = 1 to 1000
PctDone = i / 1000
With UserForm1
.FrameProgress.Caption = Format(PctDone, "0%")
.LabelProgress.Width = PctDone * (.FrameProgress.Width - 10)
End With
DoEvents
Next i