Code to work at the same time as other code???

Hi everyone,

I have the below code which produces a message box (no buttons) which pops up for 8 seconds with a message and then disappears. This is perfect and just what I want it to do.

Sub MessBox()

  UFMessBox.LabelMessage.Caption = "Processing..."
  Application.OnTime DateAdd("s", 8, Now), "UnloadMessageBoard"
  
  UFMessBox.Show
  
End Sub

and

Sub UnloadMessageBoard()

   UFMessBox.Hide
   
End Sub

The message appears after the user clicks 'Ok' on my userform. Because it takes a few seconds for the data to be entered I use the above message box to let the user know that their data is being processed. However of course my code which enters their form data runs after the above message code ends.

Does anyone know if i can get the message to pop up and whilst its there for its 8 seconds, all my other code runs at the same time?

Is this possible?

You would need to set the userform as vbModeless

Show the userform modelessly:

UFMessBox.Show vbModeless

Thanks Firefly - i'll give that a bash.

(never heard of that before!)

Hi Firefly,

Its coming up with the following:

Run time error 401
Can't show non-modal form when modal form is displayed