Hide Excel (The Entire Application)
There may occasionally arise a need to hide all of excel, a good time may be while displaying a splash screen, or possibly coding a security variation.
Put this in a module:
Public Sub HideMyExcel()
Application.Visible = False
Application.Wait Now + TimeValue("00:00:05")
Application.Visible = True
End Sub
Sidenote: I used a timer so we can see Excel again, don’t forget to set Visible=True at some point!


That is what I use to, but if you are opening another Excel time during your 5 seconds your excel file will also appear before the 5 seconds are over…
Has anybody a good idea to solve this problem?
Tom