Calender Activex Help

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Joel - 20 Mar 2008 01:24 GMT

I have drawn a calender on my excel spreadsheet using activeX.

I have a sheet for each month, what I am trying to achive is draw a calender
on each of the sheets, lets say it is the January sheet that I am looking at.

I only want it to show January on the calender and not be able to change
that date so the January sheet would show January and the February sheet
would show February.

THanks in Advance Joel

Signature

N/A

Reply to this Message

Dick Kusleika - 21 Mar 2008 21:39 GMT

>I only want it to show January on the calender and not be able to change
>that date so the January sheet would show January and the February sheet
>would show February.

Right click on the calendar and choose Properties. Change ShowDateSelectors
to False to get rid of the dropdown boxes. Then right click on the calendar
and select View Code. You'll need the following code to prevent the user
from clicking on the greyed out numbers and switching months.

Private Sub Calendar1_BeforeUpdate(Cancel As Integer)

If Sheet1.Calendar1.Month <> 1 Then
Cancel = True
End If

End Sub

Signature

Dick Kusleika
Microsoft MVP-Excel
http://www.dailydoseofexcel.com

Reply to this Message