Excel VBA code to fill monitor screen with splash screen

How can I automatically size a splash screen to fill the monitor screen?
I need it to shrink to any size monitor and expand to max 17inch diagonally  

Thanks, --Andres
AndresHernandoAsked:
Who is Participating?
 
jimyXConnect With a Mentor Commented:
After creating the splash screen, the link below will help you doing so:
http://www.ozgrid.com/Excel/excel-splash-screen.htm

Only change the code of Initialize() to be as follows:
Private Sub UserForm_Initialize()
    Application.WindowState = xlMaximized
    Me.Top = Application.Top
    Me.Left = Application.Left
    Me.Height = Application.Height
    Me.Width = Application.Width
    Application.OnTime Now + TimeValue("00:00:05"), "KillForm"
End Sub

Open in new window

The above code will set the size of the splash screen to the size of the application window itself so in order to cover the whole screen then the application is maximized so the splash covers the screen.
0
 
AndresHernandoAuthor Commented:
Perfect.  Thanks!!!
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.