Excel日期选择器和单选下拉框

 

NO1.在做excel计划表的时候，需要输入时间，手动输入实在麻烦，就做了一个VBA的宏来实现

 

1、新建excel表格，打开“控件工具箱”，点左下角的“其他控件”按钮，找到“日历控件11.0”；

2、拖动日历控件，调整合适大小，双击日历控件，进入代码编辑模式

3、输入如下代码，保存，退出到excel编辑模式

-----------------------------------------

Private Sub Calendar1_Click()
    ActiveCell = Calendar1.Value
    Me.Calendar1.Visible = False
End Sub

 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

'此处的6和7为你要显示日历的列序号

If Target.Column = 6 Or Target.Column = 7 Then

 

    Me.Calendar1.Left = Target.Left
    Me.Calendar1.Top = Target.Top
   
   
    If Target.Value <> "" Then
        Me.Calendar1.Value = Target.Value
    Else
        Me.Calendar1.Value = Now()
       
    End If
   
    Me.Calendar1.Visible = True
   
Else
    Me.Calendar1.Visible = False
End If

 

End Sub

 

 

-----------------------------------------

4、执行菜单“工具-宏-安全性”，将其设置为中或中低，确定退出，关闭excel文件

5、重新打开excel文件，单击日期单元格，就可以看到日历了哦~

 

 

NO2.在excel表格中经常输入重复相同的输入，如输入员工的学历，比较费事，可以使用下拉框来实现，只需要输入一次

 

1、新建excel表格，第三列为学历，选中第三列

2、执行菜单“数据-有效性”，“设置”标签

3、“有效性条件-允许”，选择“序列”

4、在“来源”中输入“硕士,本科,大专,中专,其他”，确定

5、回到excel，点击第三列任一单元格，会出现下拉框，选择你需要的数值即可。

 

 

Excel技巧很多，没有仔细研究，需要用的时候再研究吧~