- ·上一篇教育:excel随机函数公式如何写
- ·下一篇教育:excel标题大小如何设置
excel日历如何加节日
1.日历插入
插入--》对象--》新建--》日历控件 11.0 这样可以在Excel中插入一个日历,很方便。
如果需要获取这个日历上的点击值,可以通过简单的VBA代码实现 Alt+F11,进入VBE,双击左侧“Sheet1”,复制以下代码进去即可,如果要将日历中点击值传到其他位置,修改“Sheets("sheet1").Range("F3") ”中的“sheet1”及“F3”即可。 Option Explicit Private Sub Calendar1_Click() Sheets("sheet1").Range("F3") = Calendar1.Value End Sub 如附件所示:。
2.谁会在Excel里添加日历控件?
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 2、某一列全部设置为插入日历控件。 例如;在C列中,无论点击哪个单元格,就弹出日历控件,选择一个日期后,日期自动插入到单元格;除C列之外,点击其他单元格,不会弹出日历选择控件; 同上面(1)(2)步后,选择日历控件,双击鼠标,进入代码编辑模式,选择Worksheet和SelectionChange,输入代码: Private Sub Calendar1_Click() ActiveCell = Calendar1。
Value Me。Calendar1。
Visible = False End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target。 Column = 1 Then Me。
Calendar1。Visible = True Else Me。
Calendar1。Visible = False End If End Sub 完成后,运行VBA代码,返回Excel操作窗口,即可实现。
3.谁会在Excel里添加日历控件
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 2、某一列全部设置为插入日历控件。 例如;在C列中,无论点击哪个单元格,就弹出日历控件,选择一个日期后,日期自动插入到单元格;除C列之外,点击其他单元格,不会弹出日历选择控件; 同上面(1)(2)步后,选择日历控件,双击鼠标,进入代码编辑模式,选择Worksheet和SelectionChange,输入代码: Private Sub Calendar1_Click() ActiveCell = Calendar1。
Value Me。Calendar1。
Visible = False End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target。 Column = 1 Then Me。
Calendar1。Visible = True Else Me。
Calendar1。Visible = False End If End Sub 完成后,运行VBA代码,返回Excel操作窗口,即可实现。
4.如何利用Excel转换calendar day 与working day
有个函数是NETWORKDAYS(),还可以自定义假期. =NETWORKDAYS(start_date,end_date,holidays) 不过你要先加载宏,才能用. 工具-加载宏,然后把里面的东东加载上. ******* 可以用就行了.这个公式自动将周末给排除掉的.如果在你这段期间有节假日,你自己定义. 比如你将节假日录入在A1:A3,那公式的第三个参数就是A1:A3 ************* 日期 说明 2008-10-1 项目的开始日期 2009-3-1 项目的终止日期 2008-11-26 假日 2008-12-4 假日 2009-1-21 假日 公式 说明(结果) =NETWORKDAYS(A2,A3) 上面的开始日期和终止日期之间工作日的数值 (108) =NETWORKDAYS(A2,A3,A4) 上面的开始日期和终止日期之间工作日的数值,不包括第一个假日 (107) =NETWORKDAYS(A2,A3,A4:A6) 上面的开始日期和终止日期之间工作日的数值,不包括上面所列出的假日 (105)。
5.怎么用excel制作日历工作表
方法:
1、打开EXCEL表格,点击“开发工具”选项卡下的“控件”工作组中的“插入”命令,在弹出的的对话框中单击最右下角的“更多控件”选项
2、在弹出的“其他控件”对话框中拖动右边的滚动条直至找到“Microsoft Date And Time Picker Control”,然后单击确定
3、然后单击鼠标左键不放往左右拖开即可插入一个日历控件,此时“控件”工作组处于“设计模式”,这时候的日历控件还处于设计模式,还不能使用
4、单击“设计模式”按钮,取消选中状态,此时日历控件可以使用了。
