（1）如何在Excel2010 版中插入日历控件
参考：
http://jingyan.baidu.com/article/54b6b9c0d351602d583b4780.html （这边写的很详细）
（2） 编辑代码，让其运用与一行或几列：
我用的是：Microsoft Date and Time Picker Control，version （sp 6.0 ）
Private Sub DTPicker1_Change()
ActiveCell.Value = DTPicker1.Value
DTPicker1.Visible = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Me.DTPicker1
If Target.Column = 1 And Target.Count = 1 Then
.Visible = True
.Width = Target.Width + 15
.Left = Target.Left
.Top = Target.Top
.Height = Target.Height
Else
.Visible = False
End If
End With
End Sub
【提示】：上列代码中，红色的1表示该控件作用于工作表中第一列，如需调整，直接修改为相应的列数即可；如果需要将该控件作用于某一行，则把代码中Target.Column改为Target.Row即可。
注意：网上有很多的代码，是针对不同的日历控件的，切记不要乱COPY使用，日历控件主要有：DTP和calendar两种
