Thread
:
Calendar Control Action
View Single Post
#
3
Posted to microsoft.public.excel.programming
Excel User
external usenet poster
Posts: 18
Calendar Control Action
It works. Thank you very much, Ron. I appreciate your valuable help.
Great website, too--I have it bookmarked! Your QDE and Easy Filter add-ins
looks great--I'll be using them soon.
Thanks again.
Regards,
EU
"Ron de Bruin" wrote:
Use
Unload Me
in the click event after ActiveCell = Calendar1.Value
See my site for more example code
http://www.rondebruin.nl/calendar.htm
--
Regards Ron de Bruin
http://www.rondebruin.nl
"Excel User" <Excel
wrote in message ...
I added a calendar control to a workbook and it doesn't close after I select
a date (I have to manually click the red "close" box).
What command should I add in which module so that the calendar will close
automatically upon clicking on a date?
Below are the three modules that operate the calendar:
Private Sub Calendar1_Click()
ActiveCell = Calendar1.Value
End Sub
Private Sub UserForm_Activate()
Me.Calendar1.Value = Date
End Sub
Sub_ShowIt()
UserForm1.Show
End Sub
Thanks!
Reply With Quote
Excel User
View Public Profile
Find all posts by Excel User