Splash

J

Jena

I have created a splash screen to stay visible while some
code is executing. Does anyone have any tips or links to
create a progress bar or flashing text. I wouldn't mind
having a label or text box flash visible a few times.

Thanks
 
M

Michael Tomasura

You can try using a scrollbar.

Private Sub UserForm_Activate()
For x = ScrollBar1.Min To ScrollBar1.Max
ScrollBar1.Value = x
UserForm1.Repaint
Next x
End Sub

Michael Tomasura
 
Top