Steff,

This works for me. I put .Show in so that I could see it worked

Private Sub Calendar1_Click()
Dim stDeadline

stDeadline = Calendar1.Value
frmCalendar.Hide

With frmNytProjekt
.Label10.Caption = stDeadline
.Show
End With

End Sub

Note the dot before Label10

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Steff_DK " wrote in message
...
I get error '424' and 'Object required'.

It seems that excel won't return to the form with label10 after it
closes the form with the calendar?!?


---
Message posted from http://www.ExcelForum.com/