Hi,

There seems to go something wrong, i've posted this question three times
allready but it does not seem to appear, therefor here it comes again and
hopefully it gets thru.

Here's the code i use:

Private Sub Workbook_Open()
Application.WindowState = xlMinimized
UserForm1.Show
End Sub

And here's the problem:
When the workbook opens it's minimized, so that's ok.
However the userform does not appear on the screen automaticly, i have to
click below to actually show it.

Now the question:
How do i make the userform appear on screen without clicking for it?
Please advise.

Regards,
Peter

Comment out the line - Application.WindowState = xlMinimized

So that it looks like this:

Private Sub Workbook_Open()
' Commented out Application.WindowState = xlMinimized << Or just
remove entirely
UserForm1.Show
End Sub


"Peterke" wrote in message
...
Hi,

There seems to go something wrong, i've posted this question three times
allready but it does not seem to appear, therefor here it comes again and
hopefully it gets thru.

Here's the code i use:

Private Sub Workbook_Open()
Application.WindowState = xlMinimized
UserForm1.Show
End Sub

And here's the problem:
When the workbook opens it's minimized, so that's ok.
However the userform does not appear on the screen automaticly, i have to
click below to actually show it.

Now the question:
How do i make the userform appear on screen without clicking for it?
Please advise.

Regards,
Peter