万年历的制作.ppt

制作步骤6
对表格进行如下设置：
将B14-H14和B15-H15单元格合并居中并在其中输入：
=IF(AND(MONTH(B1)=1,DAY(B1)=1),"新的新气象！加油呀！ ",IF(AND(MONTH(B1)=3,DAY(B1)=8),"向女同胞们致敬！ ",IF(AND(MONTH(B1)=5,DAY(B1)=F191),"劳动最光荣 ",IF(AND(MONTH(B1)=4),"青年是祖国的栋梁 ",IF(AND(MONTH(B1)=6,DAY(B1)=1),"原天下所有儿童永远快乐",0)))))
选中B2输入公式：=IF(WEEKDAY(DATE($D$13,$F$13,1),2)=B3,1,0)
然后将公式复制到C2-H2 选中B6输入：=IF(B2=1,1,0)，选中B7单元格，输入公式：=H6+1.并
复制到B8，B9单元格中。 分别选中B10，B11，输入公式：=IF(H9>A2,0,H9+1)和
万年历的制作
制作步骤1
启动EXCEL2003，新建工作表，并且在表格中输入如下的文字
制作步骤2
同时选中B1，C1，D1并且合并及居中，输入：=TODAY（），对单 元格执行“格式—单元格”，如图所示：
制作步骤3
选中F1单元格，输入：=IF(WEEKDAY(B1,2)=7，“日”， WEEKDAY(B1,2)); 选中H1，输入：=NOW()。在F1单元格中，打 开如下对话框：
最后得到如下的万年历：
选中H1，如下设置：
制作步骤4
对wenku.baidu.com1，I2单元格分别输入1900,1901，然后对其进行填充拖拉至I151， 同样对J1拖拉至J12
选中D13单元格，执行“数据—有效性”命令，打开“数据有效性” 对话框，如图
同样的操作，对F13设置数据有效性：如下
制作步骤5
选中A2单元格，输入公式：如下：
=IF(H10>$A$2,0,IF(H10>0,H10+1,0)) 选中C6单元格，输入公式：=IF(B6>0,B6+1,IF(C2=1,1,0))。并复制到
D6-H6中 选中C7输入公式：B7+1，复制到C8-H9中。 选中C10，输入=IF(B10>=$A$2,0,IF(B10>0,B10+1,IF(C6=1,1,0))) 并复制到D10-H10中和C11中
=IF(AND(MONTH(B1)=7,DAY(B1)=1),"党的恩情永不忘 ",IF(AND(MONTH(B1)=8,DAY(B1)=1),"提高警惕，保卫祖国！ ",IF(AND(MONTH(B1)=9,DAY(B1)=10),"老师，您辛苦 了!",IF(AND(MONTH(B1)=10,DAY(B1)=1),"祝我们伟大的祖国繁 荣富强",0))))