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.
|