How do I display a "Please Wait" message ?

[Siggy19]

I know this is dumb.

I want to display a "Please wait" message in the middle of the screen while saving a big document in Excel. When the save is finished, I want the message to vanish without any intervention by the user.

How do I do this ??? MsgBox demands a response and when I try putting a label in a seperate window, with the save in the newwindow.Activate event, it does not display the label !

 

[guitarzan]

With regard to the label not displaying... try putting DoEvents before the code that does the save.

 

[bclt]

Private Sub Save()
  dim fWait As New formWait
  
  DoEvents()

  fWait.Show()
  SaveToExcel
  fWait.Close
End Sub

The formWait has a label on it with text e.g "Please wait, saving to Excel...

 

[bclt]

Sorry i thought it was on vb.NET ...

Private Sub Save()
  Load frmWait
  
  DoEvents()

  frmWait.Show
  SaveToExcel
  Unload frmWait
End Sub

The frmWait has a label on it with text e.g "Please wait, saving to Excel...