Thread: Splash Screen
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips[_6_] Bob Phillips[_6_] is offline
external usenet poster
 
Posts: 11,272
Default Splash Screen

I have Excel 2000 on this laptop, and your code worked fine here. Where does
the error occur?

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Bill" wrote in message
nk.net...
Hello,
I use a splash screen when a macro opens. Never had a problem with it.

Now
a user with Excel 2000 had an error after enabling macros: Microsoft Excel
400 error which has to with showing a form. It was the splash screen.

When
I bypassed showing the form, it worked for that user. It works fine

showing
the splash screen with my Excel 2000.

Code:

In this workbook:


Private Sub Workbook_Open()
SplashSSS.Show
End Sub

In form:
Private Sub UserForm_Activate()
Application.OnTime Now + TimeValue("00:00:03"), "KilltheForm"
End Sub

In a module:

Public Sub KilltheForm()
Unload SplashSSS
End Sub

Any idea why this would generate an error?

Thanks.

Bill