Excel 2010 表格中插入日历选择
1. 进入表单,选择Developer(开发),点击Inrt(插入)
2. 点击弹出对话框中More Controls (更多控制)选项
3. 选择弹出对话框中Microsoft Date and Time Picker Control 6.0 (日历控件)
难看的英文4. 点击OK
5. 对话框消失,鼠标变成十字符。
6. 移动十字符到需要的位置,按住鼠标左键,拉动鼠标,选择合适大小,出现如下图
7. 如果有需要可调整该框的大小。
8. 双击该框内任意一点,对该控件进行编程,出现如下对话框
9. 将下面程序拷入
Private Sub DTPicker21_cloup()
ActiveCell = DTPicker21.Value
Me.DTPicker21.Visible = Fal
儿童身心发展规律工期承诺书End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 3 Then
DTPicker21.Left = Target.Left
DTPicker21.Top = Target.Top
Me.DTPicker21.Visible = True
ElIf Target.Column = 4 Then
DTPicker21.Left = Target.Left
DTPicker21.Top = Target.Top
Me.DTPicker21.Visible = True
ElIf Target.Column = 6 Then
DTPicker21.Left = Target.Left
DTPicker21.Top = Target.Top
Me.DTPicker21.Visible = True
El
Me.DTPicker21.Visible = Fal
End If
香菇鸡蛋董庭兰End Sub
10. 出现如下状况
字母大小写对照表11. 点击Excel图标,进入表单
12. 点击Design Mode(设计模式),以进入编辑模式
13. 程序中Target.Column = 4 是选择哪一列用来输入日历,如果需要,可多加或减少列数。
4就是D列。
14. 点击选择按钮关于工资总额组成的规定
15. 选择日期
16. 任务完成
17. 存盘时应选择xlsm类型,否则控件将无法保存。
微风吹过的夏天
18. 也有用click()功能取代Cloup(),亦可实现,多试试就会有新发现。