Using Calendar Control 12.0

[raschwab]

I have inserted Calendar Control 12.0 in to a userform and would like to have the results go into to a test box, located on the same userform. I have tried using the following code to have the selection from the calendar control placed in the textbox:

Private Sub Calendar1_Click()
    Me.tbDate.Value = Format(Calendar1.Value, "dd mmm yy")
End Sub

I am using Excel 2007. Any assistance would be greatly appreciated.

Rick Schwab

 

[raschwab]

Sorry, for the inconvenience. When I changed the code in the Sub to "Me.tbDate.Value = Format (Me.Calendar1.Value, "dd mmm yy")" it works.

Rick Schwab