On 23 Sep, 12:08, Mette wrote:
Hi Duncan

I have put it in a Private Sub in another sheet (and also in the Private sub
Workbook_Open):

Private Sub CommandButton2_Click()
Sheets("Porteføljesammensætning").Select

Load UserForm1
UserForm1.StartUpPosition = 0
UserForm1.Left = -50
UserForm1.Top = 20

UserForm1.Show
End Sub

and it still pop up in the middle of the screen.

Mette

"Duncan" skrev:

On 23 Sep, 11:24, Mette wrote:
Hi Corey

Thanks for your answer.

I have tried this:

Load UserForm1
UserForm1.StartUpPosition = 0
UserForm1.Left = -30
UserForm1.Top = 20

UserForm1.Show

but nothing is changed. The UserForm still pop up in the middle of the
screen. What am I doing wrong?

"corey" skrev:

Select the form in VB, and Change the StartUpPosition to manual.

Then place the required position in the LEFT=

Corey....
"Mette" wrote in message
...
Hi,

I have created a userform which startups when the file opens.

I would like a specific placement different from the standard.

How do I have it to startup with its left corner in A18 for instance?

Mette

That code works fine. Where have you put it?



Just done the same;

Private Sub CommandButton1_Click()

Worksheets("sheet1").Select
Load UserForm1
UserForm1.StartUpPosition = 0

UserForm1.Left = -50
UserForm1.Top = 20

UserForm1.Show

End Sub

Works no problems in Excel 2003 so your code is fine. Try adding an
extra line before the Show command;

msgbox "Left = " & str(userform1.left) & ", Top = " &
str(userform1.top)

...to see that it is getting this far ok.