乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > EXCEL表里怎么添加日期选择器

EXCEL表里怎么添加日期选择器

作者:乔山办公网日期:

返回目录:excel表格制作


1、打开需要编辑的excel文档,然后点击右上角的“开发工具”菜单。

2、这时会打开开发工具标签,在工具栏上点击“插入”图标。

3、在打开的插入下拉菜单中点击“更多工具”按钮。

4、这时会打开其它控件窗口,在窗口中找到Microsoft data and Time Picker Control,Version 6.0一项,然后点击确定按钮。

5、这时在Exce文档中点击一下鼠标,就可以把Excel日历控件插入到文档中了哦。这时选中刚刚插入的日历控件。

6、这时选中刚刚插入的日历控件,然后点击一下工具栏上的“设计模式”按钮,就可以使用了。



1、在某一单元格中插入日历控件

(1)选中要插入日历控件的单元格,设置单元格格式为日期型;

(2)点击工具栏,“插入—对象—日历控件”,

(3)用快捷方式Alt+F11,双击插入控件的工作表名称,粘贴下面的代码,用来实现单击A1时弹出日历控件,单击日历控件后,将选中的日期值填入A1并隐藏控件。


Private Sub Calendar1_Click()

ActiveCell = Calendar1

Calendar1.Visible = False

[a2].Select

End Sub


Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Address = "$A$1" Then Calendar1.Visible = True

End Sub


可用数据有效性实现。
步骤:
选定单元格,点菜单“数据”——“有效性”,点“设置”标签,在“允许”中选择“序列”,在“来源”中输入日期存放区域,确定。

方法/步骤
在开发工具栏选择插入-其他控件,打开其他控件选择框。

在选择框中选择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保存为启用宏的工作薄。

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

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

插入该控件后,在非设计模式下即可点击弹出日期选择界面。

望采纳

相关阅读

  • EXCEL表里怎么添加日期选择器

  • 乔山办公网excel表格制作
  • 1、打开需要编辑的excel文档,然后点击右上角的知“开发工具”菜单。2、这时道会打开开发工具标签,在工具栏上点击“插入”图标。3、在打开的插入下拉菜单中点击“更多专工具”按
关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网