View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default window minimize

Private Sub workbook_open()
Application.Visible = False
start_screen.Show
Applicaton.Visible = True
End Sub

Might do something similar to what you want.

or

Private Sub workbook_open()
ThisWorkbook.Windows(1).Visible = False
start_screen.Show
ThisWorkbook.Windows(1).Visible = True
End Sub

Regards,
Tom Ogilvy


"Joe" wrote in message
...
I would like to minimize the current excel workbook when
the file is opened and only display a user form. The
problem is, when i do this the only way i can see the form
is to click on the minimized file. The code is simple but
the form will not popup on the screen. If this makes
sense does anyone have any suggestions? Here is the code
I am using.

Private Sub workbook_open()
Application.WindowState = xlMinimized
start_screen.Show
End Sub

Thanks in advance


Joe