Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar popup
I am using the calendar1 popup. Is there a way to make the dates prior to
Todays date unselectable? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar popup
I don't think you can prevent the user from clicking an earlier date, but
you can intercept the Click event and set the Value to the current date: Private Sub Calendar1_Click() If Me.Calendar1.Value < Int(Now) Then Me.Calendar1.Value = Int(Now) End If End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com (email address is on the web site) "jnf40" wrote in message ... I am using the calendar1 popup. Is there a way to make the dates prior to Todays date unselectable? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Calendar popup
Hi jnf40,
you could do something like this (added to teh click event f the calendar): - ===== Private Sub Calendar1_Click() If Calendar1.Value < Now() Then MsgBox "can't select dates before today" Calendar1.Value = Now() End If End Sub ===== hth, tim "jnf40" wrote in message ... I am using the calendar1 popup. Is there a way to make the dates prior to Todays date unselectable? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Popup calendar | Excel Discussion (Misc queries) | |||
calendar popup | Excel Discussion (Misc queries) | |||
Using the popup calendar | Excel Programming | |||
Popup calendar | Excel Programming | |||
Popup calendar | Excel Programming |