See
http://www.ozgrid.com/Excel/excel-splash-screen.htm
--
Regards
Dave Hawley
www.ozgrid.com
"ordnance1" <(E-Mail Removed)> wrote in message
news:AE30FA14-CF76-4375-BCDE-(E-Mail Removed)...
> Hi
>
> JLGWhiz had been helping me with this, but I took a few days off before I
> got back to this. The code below is what he suggested, but while the
> UserForm
> triggers, it does not disappear after 5 seconds (or any length of time).
> Any
> suggestions out there?
>
>
> Sub test()
>
> UserForm1.Show
> Application.Wait (Now + TimeValue("00:00:05"))
> Unload UserForm1
>
> End Sub
>