View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Dan E[_2_] Dan E[_2_] is offline
external usenet poster
 
Posts: 102
Default window minimize

I would suggest putting the "Application.Visible = True" under the userform
"Userform_Terminate" event.
ie.
Private Sub workbook_open()
Application.Visible = False
start_screen.Show
End Sub

Private Sub UserForm_Terminate()
Application.Visible = True
End Sub

Excel wouldn't re_open using the first code, until I opened another
workbook.

Dan E

"Tom Ogilvy" wrote in message
...
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