Excel User form Help needed 2

[kitackers]

I'm reasonably new to VBA in excel and need some help on a spreadheet with a calender control function.

I have a calender control on a spreadsheet that opens up with a button, when the date is selected it populates cell D8 with the date, but I then have to click the "X" to close the calender. I want to know if I can get the form to close at the same time.

At the moment the code on the form is

Private Sub Calendar1_Click()
Range("D8") = Calendar1.Value
ActiveCell.NumberFormat = "dd/mm/yy"
End Sub

I've trawled through the FAQ's but can't find anything.

Can anyone help?!?

 

[combo]

Unload userform:
Private Sub Calendar1_Click()
Range("D8") = Calendar1.Value
ActiveCell.NumberFormat = "dd/mm/yy"
Unload Me
End Sub

With your code you set value of D8, and format active cell. In general, they can be different.

 

[CBasicAsslember]

Assuming the calendar control is in UserForm1:

Private Sub Calendar1_Click()
    Range("D8") = Calendar1.Value
    ActiveCell.NumberFormat = "dd/mm/yy"
    Unload UserForm1
End Sub