表格中的任意日期选取怎么设置?
![](/wenda/images/newWd/search.png)
问题已解决
所属话题:
#实务#
![](http://member.chinaacc.com/homes/resources/images/home/avatar/5.jpg)
84784955 | 提问时间:2019 10/26 08:58
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:02
相关问答
查看更多最新问答
查看更多