Calender Activex Help

[Joel]

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

 

[Dick Kusleika]

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