EXCEL的单元格中如何插入一个时间选择框

1、在开发工具栏选择插入-其他控件，打开其他控件选择框。

2、在选择框中选择calendar control8.0，确定。

3、在适当的位置绘制日历，并将高度和宽度适当调整。这时的日历控件还比较原始，不会点击日期后自动隐藏日历并在单元格内填入日期，这时就需要添加自己的代码。

4、在设计模式下双击日历。

点击设计模式，当图表颜色变深后就是设计模式，打开代码编辑器。

在光标处输入下方的代码：

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

5、关闭代码编辑器，将EXCEL保存为启用宏的工作薄。

6、再次打开该工作薄，点击第一列或者第二列，就可以d出日历选择器，选择日期后，在单元格内会插入日期，日历选择器消失。注意这是在非编辑模式下才可以实现的。

7、EXCEL除了这个日历控件外还有一个另一个比较简单的日历选择器Microsoft date and time picker control(SP6)。

8、插入该控件后，在非设计模式下即可点击d出日期选择界面。如下：

在Excel单元格中插入当前日期或时间的具体步骤如下：

我们需要准备的材料分别是：电脑、Excel表格。

1、首先我们打开需要编辑的Excel表格。

2、然后我们点击需要添加日期的单元格，输入公式“=TODAY()”，之后回车确定。

3、然后我们在单元格中就可以看到显示出当前的日期了。

---