Simoneexcel中使用日历控件来选择日期
的有关信息介绍如下：
excel表格录入数据的时候，总是键盘录入日期，提高不了效率，若适当使用日期控件，则可提高效率，减少误差。
本文介绍使用日期控件来双击录入日期的方法。
设置好表格，如需要在B5单元格中录入日期
选择开发工具，点击“设计模式”
点击插入ActiveX控件，出现的列表框中选择“其他控件”
其他控件列表框中拉到最下面，选择“日历控件”
在表格中把日历控件画出来，调整好自己喜欢的大小与格式，默认日历控件名称为：Calendar1
进入Visual Basic，设置日历控件的代码：
显示隐藏日历控件，当B5单元格被选中时，日历控件自动出现，日期为当前系统日期，代码如下：
--------------------------
Pivate Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 And Target.Row = 5 Then
Calendar1.Visible = True
Calendar1.Left = ActiveCell.Left + ActiveCell.Width
Calendar1.Top = ActiveCell.Top
Calendar1.Today
Else
Calendar1.Visible = False
End If
End Sub
-----------------------------
双击控件选择日期，代码如下：
---------------------------------
Private Sub Calendar1_DblClick()
ActiveCell.Value = Calendar1.Value
Calendar1.Visible = False
End Sub
------------------------------
设置好两段代码后即可完成，关闭Visual Basic
回到表格，关闭开发模式下的“设计模式”
此时日期控件就会自动隐藏，
当你点击B5时，日起控件出现，你就可以选择任意日期，双击，自动填入B5中
