Private Sub Userform_Initialize()
userform.Width = 30
userform.Height = 40
End Sub

Might help, but I can't say why it is happening.

--
Regards,
Tom Ogilvy

"Frustrated" wrote in message
...
I am using VBA in Excel XP with Win 2K. PLEASE help me with this issue.

I have a user form on which there is a single control (calendar control
10.0). I have simple code attached to a button on a sheet that opens the
form obtains the date the user double clicked and then dismisses the form
again.

Everything works fine except: every time the form is opened it gets a
little smaller. It will even cut off the right edge of the calendar control
obscuring the last day of the week from view.

The height and width properties of the form are changed, even though I
manually set them before hand to the correct size.

Please advise me on this, what is going on?