主要运用函数公式+条件格式就可以完成日历制作
至于待办事项可以通过vba的selection change事件程序完成
成品图如下:
成品图
日历制作步骤如下:
第一步、顶端日期不在赘述,直接输入文字,也可以通过插入数值调节钮控件做。第三行日期用函数today()完成,并设置单元格格式为相应的日期格式
顶端日期设置
第二步、第四行输入星期一至星期日文字,在B5单元格输入如下公式后向右、向下填充,并将日期格式设置按天显示(即设置单元格格式中自定义,类型:dd 即可)
=($B$2&"-"&$D$2&"-1")-WEEKDAY($B$2&"-"&$D$2&"-1",2)+1+COLUMN(A1)-1+ROW($A1)*7-7
每天日期设置公式
第三步、选中B5:H10这个区域,利用公式设置条件格式只显示当月日期(当月份不等于D2的数值时字体显示为白色,即跟背景色一致),公式设置如下:
=MONTH(B5)<>$D$2
条件格式设置1
选中G5:H10这个区域,利用公式设置条件格式将本月的周末日期字体用红色强调(当月份等于D2的数值时字体显示为红色,即跟背景色一致),公式设置如下:
=MONTH(G5)=$D$2
条件格式设置2
可以参考经验:网页链接