作者：乔山办公网日期：
返回目录：excel表格制作
方法/步骤
在开发工具栏选择插入-其他控件e68a847a64337，打开其他控件选择框。
在选择框中选择calendar control8.0，确定。
在适当的位置绘制日历，并将高度和宽度适当调整。这时的日历控件还比较原始，不会点击日期后自动隐藏日历并在单元格内填入日期，这时就需要添加自己的代码。
在设计模式下双击日历。
点击设计模式，当图表颜色变深后就是设计模式，打开代码编辑器。
在光标处输入下方的代码：
ActiveCell = Calendar1.Value Me.Calendar1.Visible = FalseEnd Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Or Target.Column = 2 Then
'此处的1和2为你要显示日历的列序号
Me.Calendar1.Left = Target.Left Me.Calendar1.Top = Target.To If Target.Value <> "" Then Me.Calendar1.Value = Target.Value Else Me.Calendar1.Value = Now( End I Me.Calendar1.Visible = TruElse Me.Calendar1.Visible = FalseEnd If
关闭代码编辑器，将EXCEL保存为启用宏的工作薄。
再次打开该工作薄，点击第一列或者第二列，就可以弹出日历选择器，选择日期后，在单元格内会插入日期，日历选择器消失。注意这是在非编辑模式下才可以实现的。
EXCEL除了这个日历控件外还有一个另一个比较简单的日历选择器Microsoft date and time picker control(SP6)。
插入该控件后，在非设计模式下即可点击弹出日期选择界面。
望采纳
在开发工具中选择插入——其他控件，选择一个日历控件插入即可
比如office自带的“Microsoft Date and Time picker Control”
单击“开发工具”选项卡下的“控件”工作组中的“插入”命令，在弹copy出的的对话框中单击最右下角的“更多控件”选项，如下图所示：
在弹出的“其他控件”对百话框中拖动右边的滚动条直至找到“Microsoft Date And Time Picker Control”，然后单击确定，如下度图所示：
然后单击鼠标左键不放往左右拖开即可插入一个日历控件，此时“控件”工作组处于“设计模式问”，这时候的日历控件还处于设计模式，还不能使用，如下图所示：
单击“设计模式”按钮，取消它的选中状答态，此时日历控件可以使用了。如下图所示：
方法/步骤
第一步需要您确认您的Excel菜单中有没有开发工具这一选百项，若没有我们需要手动添加一下
介绍一下怎么添加开发工具度菜单项：点击文件，打开文件菜单下找到选项菜单点击打开，如下图所示勾选开发工具选项即可
开发工具添加成功后将设计模式打开，如下图设计模式会一直呈现为橙色，说明此时是在设计模式状态下
单击插入，选择下图中红框中的其他选项，用来添加非常规的控件
在弹出的其他控件中选择下图所示的Microsoft Date and Timer Picker Control，这个就是我们需要的日历控件
点击确定后光标会变成一个十字形光标，在您要添加日历的地方单击鼠标拖动光标，绘版制出您要的日历控件，如图所示
绘制成功后您可以先保存下，但此时控件还没有功能，你需要关闭设计模式方可使用，如下图在开发工具中关闭设计模式，权如下图所示，此时设计模式按钮不再为橙色，您的控件也就可以使用了