教你用Excel怎样制作万年历
摘要: 准备工作,制作如下电子表格:第一步;在C2中输入=TODAY()回车。TODAY()函数用于提取当前系统日期。 第二步;在F2中输入=IF(WEEKDAY(C2,2)=7,"日",WEEKDAY(C2,2)) 回车。第三筹备工作,建造如下电子表格:
第一步;在C2中输入=TODAY()回车。TODAY()函数用于提取当前系统日期。
第二步;在F2中输入=IF(WEEKDAY(C2,2)=7,"日",WEEKDAY(C2,2)) 回车。
第三步;在H2中输入 =NOW() 回车。NOW()用于提取当前系统时刻。
第四步:在D14中设置下拉菜单,数值为1900—2029。
第五步;在F14中设置下拉菜单,数值为1—12。
将查询日期调为当前日期,如下图:
第六步;在A3中输入:
=IF(F14=2,IF(OR(D14/400=INT(D14/400),AND(D14/4=INT(D14/4),D14/100<>INT(D14/100))),29,28),IF(OR(F14=4,F14=6,F14=9,F14=11),30,31))回车。
第七步:B3中输入=IF(WEEKDAY(DATE($D$14,$F$14,1),2)=B4,1,0)回车。选中B3向右复制公式至H3。
第八步;B 6中输入=IF(B3=1,1,0)回车。
第九步;在B7中输入=H6+1回车,选中B7,向下复制公式至B9。
第十步;在B10中输入=IF(H9>=A3,0,H9+1)回车。
第十一步:在B11中输入=IF(H10>=A3,0,IF(H10>0,H10+1,0))回车。
第十二步:在C6中输入=IF(B6>0,B6+1,IF(C3=1,1,0))回车。
第十三步:在C7中输入=B7+1回车。
第十四步:选中C7向下复制公式至 C9。
第十五步:在C10中输入=IF(B10>=$A$3,0,IF(B10>0,B10+1,IF(C6=1,1,0)))回车。
第十六步:选中C6,向右复制公式至H6。
选中C7,向右复制公式至H7。
选中C8,向右复制公式至H8。
选中C9,向右复制公式至H9。
选中C10,向右复制公式至H10。
选中B11,向右复制公式至H11。
第十七步:选中第3行和第4行,字体颜色设置为白色。潜匿I列和J列。
第十八步;美化万年历表格:更改日期和时刻名目、设置单元格布景等。
最后下场图:
关键词:Excel,万年历
相关阅读
- 05-22office2003快捷键大全、word\excel2003快捷键
- 02-25excel快捷键大全、excel快捷键命令大全
- 09-26打开excel提示“找不到必要的安装文件sku001.CAB”怎么办
- 08-05如何解决Excel打开时总是出现stdole32.tlb的提示
- 12-26Sql Server 数据库表查询结果导出为excel文件
- 09-14Excel提示找不到D:\MY.XLSX的解决方法
- 03-04excel 2012使用技巧 隐藏复制粘贴按钮教程
- 02-18教您在excel中如何换行
- 11-30Excel文件加密与隐藏方法
- 11-02怎样批量新建文件夹?excel批量创建快速又简单
阅读本文后您有什么感想? 已有 人给出评价!
用户评论
热门评论
最新评论
相关软件
热点图文
- 04-22最新的windows xp sp3序列号(绝对可通过正版验证)Xp激活码
- 05-05解决方法:An error occurred on the server when processing the URL. Please contact the system administrator
- 04-09十小方法让你的Windows 7操作系统运行如飞
- 10-06Windows XP用户配置文件丢失或损坏后的恢复方法
- 03-17Windows7 SP1 专业零售/VOL中文版下载/简体中文旗舰版(MSDN官方原版)附激活说明
- 05-18用U盘安装原版XP系统SATA硬盘
- 03-21解决WMP播放Flash“当前安全设置不允许该操作”的问题
- 07-27windows7激活码 破解windows 7的方法
- 12-25解决windows 7资源管理器已停止工作问题
- 04-25Windows7安装字体和用快捷方式安装字体