View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Ed[_18_] Ed[_18_] is offline
external usenet poster
 
Posts: 118
Default UserForm label doesn't load?

I made a small UserForm with a label that says "Waiting" to pop up during
some of my longer macro routines. I'm trying it in one program using the
code below, but the Label never loads - it stays a white square. What would
be the best way to figure out why it won't load? Or does anyone have a
correction for this?

Ed

<Dims here

Load UserForm1
cntFound = 0

MyTarget = ""
MyTarget = Application.InputBox("What text are you searching for?")
If MyTarget = "" Or MyTarget = "False" Then GoTo Bye

UserForm1.Show vbModeless

Range("B1").Activate
strName = ActiveWorkbook.Name
Application.ScreenUpdating = False

Do
<loop through code
<Form unloaded at end