Thread: calendar
View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Nigel Nigel is offline
external usenet poster
 
Posts: 923
Default calendar

Goto menu View-Toolbars and activate the 'Control Toolbox' - the icon (by
default) on the left is labelled design mode, click this and the controls on
the worksheet can be edited and moved around. (unlocked in your terms).

Cheers
Nigel


"dyowell" wrote in message
...

-----Original Message-----
On sheet1 insert a calendar control - from the menu

choose Insert-Object
and from the list 'Calendar Control 8.0' the actual

version number may vary.
In design mode you can format this and set defaults etc.,

using the
properties, Right Click, choose Calendar Object-
Properties.

Behind sheet1 place the following code

Private Sub Calendar1_Click()
ActiveCell.Value = Calendar1.Value
Calendar1.Visible = False
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As

Range)
If Target.Column = 1 Then
Calendar1.Visible = True
End If
End Sub

The above code will hide the control until a cell in

column 1 ("A") is
clicked, the calendar will becoem visible allow you to

change year and
month, when you click on the actual day the value will be

placed in the cell
in colum 1 you clicked.

Hope this provides a template.

Cheers
Nigel


"dyowell" wrote in message
...
I have a worksheet that has a date column. I would like
to be able to click in the column and bring up a

calendar
view to choose the date. I have no idea how to do this,
but thought that maybe someone could help lead me in the
right direction. Thanks in advance for the help.



.
Thanks for the help. Nigel, I am able to get the calendar

on my worksheet. However, the calendar seems to be
frozen. When you say to go to design mode, I'm not sure
what you are talking about. Could you please let me know
how to get to design mode? Thanks.