表格中的任意日期选取怎么设置?
忧郁的太阳
于2019-10-26 08:58 发布 4578次浏览
- 送心意
何江何老师
职称: 中级会计师,高级会计师,税务师
2019-10-26 09:02
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
还没有符合您的答案?立即在线咨询老师 免费咨询老师
精选问题
获取全部相关问题信息
忧郁的太阳 追问
2019-10-26 09:10
何江何老师 解答
2019-10-26 09:34
忧郁的太阳 追问
2019-10-26 16:10
何江何老师 解答
2019-10-26 16:21