利用Excel制作万年历

用EXCEL制作一份万年历本文所涉及到的函数有：1、AND (logical1,logical2, ...)2、DATE (year,month,day)3、DAY (serial_number)4、IF (Logical,Value_if_true,Value_if_false)5、INT (number)6、MONTH (serial_number)7、NOW ()8、OR (logical1,logical2, ...)1、启动EXCEL2003，新建一个工作表，取名保存（如万年历.xls），并在相应的单元格中，输入如图1所示的文本。

2、同时选中B1、C1、D1单元格，按“格式”工具栏上的“合并及居中”按钮，将其合并成一个单元格，并输入公式：=TODAY（）。

选中B1（合并后的）单元格，执行“格式→单元格”命令，打开“单元格格式”对话框（如图2），在“数字”标签中的“分类”下面选中“日期”选项，再在右侧“类型”下面选中“二○○一年三月十四日”选项，“确定”退出，将日期设置成中文形式。

注意：TODAY（）函数用于提取当前系统日期，请将系统日期一定要调整准确哟。

3、选中F1单元格，输入公式：=IF(WEEKDAY(B1,2)=7,"日",WEEKDAY(B1,2))；选中H1单元格，输入公式：=NOW（）。

选中F1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“特殊”选项，再在右侧“类型”下面选中“中文小写数字”选项，“确定”退出，将“星期数”设置成中文小写形式；选中H1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“时间”选项，再在右侧“类型”下面选中一款时间格式，“确定”退出。

注意：①上述前面一个公式的含义是：如果（IF）当前日期（B1）是星期“7”（WEEKDAY(B1,2)=7），则在F1单元格中显示“日”，否则，直接显示出星期的数值（WEEKDAY(B1,2)）。

Excel 2003制作万年历的步骤1、启动EXCEL2003，新建一个工作表，取名保存（如万年历.xls），并在相应的单元格中，输入如图1所示的文本。

2、同时选中B1、C1、D1单元格，按“格式”工具栏上的“合并及居中”按钮，将其合并成一个单元格，并输入公式：=TODA Y（）。

选中B1（合并后的）单元格，执行“格式→单元格”命令，打开“单元格格式”对话框（如图2），在“数字”标签中的“分类”下面选中“日期”选项，再在右侧“类型”下面选中“二○○一年三月十四日”选项，“确定”退出，将日期设置成中文形式。

注意：TODAY（）函数用于提取当前系统日期，请一定要将系统日期调整准确哟。

3、在F1单元格中输入公式：=IF(WEEKDAY(B1,2)=7,"日",WEEKDAY(B1,2))；在H1单元格中输入公式：=NOW（）。

选中F1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“特殊”选项，再在右侧“类型”下面选中“中文小写数字”选项，“确定”退出，将“星期数”设置成中文小写形式；选中H1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“时间”选项，再在右侧“类型”下面选中一款时间格式，“确定”退出。

注意：①上述前面一个公式的含义是：如果（IF）当前日期（B1）是星期“7”（WEEKDAY(B1,2)=7），则在F1单元格中显示“日”，否则，直接显示出星期的数值（WEEKDAY(B1,2)）。

②上述第二个函数（NOW（））用于提取当前系统日期和时间，也请将系统日期和时间调整准确。

4、在I1、I2单元格分别输入1900、1901，然后同时选中I1、I2单元格，用“填充柄”向下拖拉至I151单元格，输入1900—2050年份序列。

同样的方法，在J1至J12单元格中输入1—12月份序列。

5、选中D13单元格，执行“数据→有效性”命令，打开“数据有效性”对话框（如图3），按“允许”右侧的下拉按钮，选中“序列”选项，在“来源”下面的方框输入：=$I$1:$I$151，“确定”退出。

今日我们介绍用Excel制作万年历的方法。

这个万年历能够显示当月的月历，还能够任意查阅任何日期所属的月历，特别方便。

假如你愿意，还能够让它在特别的日子里显示不一样的提示文字，一同来试一试吧！本文所波及到的函数有：1、AND (logical1,logical2, ...)2、DATE (year,month,day)3、DAY (serial_number)4、IF (Logical,Value_if_true,Value_if_false)5、INT (number)6、MONTH (serial_number)7、NOW ()8、OR (logical1,logical2, ...)1、启动EXCEL2003，新建一个工作表，取名保留（如万年历.xls），并在相应的单元格中，输入如图1所示的文本。

注意：①上述前方一个公式的含义是：假如（IF）目前日期（B1）是礼拜“7”（WEEKDAY(B1,2)=7），则在F1单元格中显示“日”，不然，直接显示出礼拜的数值（WEEKDAY(B1,2)）。

②上述第二个函数（NOW（））用于提取目前系统日期和时间，也请将系统日期和时间调整正确。

4、在I1、I2单元格分别输入1900、1901，而后同时选中I1、I2单元格，用“填补柄”向下拖沓至I151单元格，输入1900—2050年份序列。

相同的方法，在J1至J12单元格中输入1—12月份序列。

5、选中D13单元格，履行“数据→有效性”命令，翻开“数占有效性”对话框（如图3），按“同意”右边的下拉按钮，选中“序列”选项，在“根源”下边的方框输入：=$I$1:$I$151，“确立”退出。

相同的操作，将F15单元格数占有效性设置为“=$J$1:$J$12”序列。

注意：经过这样的设置此后，当我们选中D15（或F15）单元格时，在单元格右边出现一个下拉按钮，按此下拉按钮，即可选择年份（或月份）数值，迅速输入需要查问的年、月值。

自己动手制作Excel万年历自己动手制作Excel万年历在网上看到别人用Excel制作的万年历非常精美，于是自己动手，跟着学习，自己制作一了属于自己的“万年历”；现在把制作过程和大家一起分享！首先还是看看我制作的“万年历”的最终效果：这个万年历可以显示当月的月历，还可以随意查阅任何日期所属的月历，非常方便，一起来试试吧！第一步：启动Excel2003，新建一个工作表，取名保存（如万年历.xls）；并在相应的单元格中输入如图①所示的内容。

其中：在I1、I2单元格分别输入1900、1901，然后同时选中I1、I2单元格，用“填充柄”向下拖拉至I151单元格，即输入1900―2050年份序列；同样的方法，在J1至J12单元格中输入1―12月份序列。

第二步：同时选中B1、C1、D1单元格，单击“格式”工具栏上的“合并及居中”按钮，将其合并成一个单元格，并输入公式=TODAY（）后回车；再次选中B1（合并后的）单元格，执行“格式→单元格→数字→分类→日期”，在右侧“类型”下面选中“二○○一年三月十四日”选项，“确定”退出，将日期设置成中文形式。

（如图②）注：TODAY（）函数用于提取当前系统日期，请将系统日期一定要调整准确哟。

第三步：选中F1单元格，输入公式=IF(WEEKDAY(B1,2)=7,"日",WEEKDAY(B1,2))后回车；再次选中F1单元格，执行“格式→单元格→数字→分类→特殊”，在右侧“类型”下面选中“中文小写数字”选项，“确定”退出，将“星期数”设置成中文小写形式。

（如图③）注：上述公式的含义是：如果（IF）当前日期（B1）是星期“7”（WEEKDAY(B1,2)=7），则在F1单元格中显示“日”，否则，直接显示出星期的数值（WEEKDAY(B1,2)）。

第四步：选中H1单元格，输入公式=NOW（）后回车；再次选中H1单元格，执行“格式→单元格→数字→分类→时间”，在右侧“类型”下面选中一款时间格式，“确定”退出。

今天我们介绍用Excel制作万年历的方法。

这个万年历可以显示当月的月历，还可以随意查阅任何日期所属的月历，非常方便。

如果你愿意，还可以让它在特殊的日子里显示不同的提醒文字，一起来试试吧！本文所涉及到的函数有：1、AND (logical1,logical2, ...)2、DATE (year,month,day)3、DAY (serial_number)4、IF (Logical,Value_if_true,Value_if_false)5、INT (number)6、MONTH (serial_number)7、NOW ()8、OR (logical1,logical2, ...)1、启动EXCEL2003，新建一个工作表，取名保存（如万年历.xls），并在相应的单元格中，输入如图1所示的文本。

2、同时选中B1、C1、D1单元格，按“格式”工具栏上的“合并及居中”按钮，将其合并成一个单元格，并输入公式：=TODAY（）。

选中B1（合并后的）单元格，执行“格式→单元格”命令，打开“单元格格式”对话框（如图2），在“数字”标签中的“分类”下面选中“日期”选项，再在右侧“类型”下面选中“二○○一年三月十四日”选项，“确定”退出，将日期设置成中文形式。

注意：TODAY（）函数用于提取当前系统日期，请将系统日期一定要调整准确哟。

3、选中F1单元格，输入公式：=IF(WEEKDAY(B1,2)=7,"日",WEEKDAY(B1,2))；选中H1单元格，输入公式：=NOW（）。

选中F1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“特殊”选项，再在右侧“类型”下面选中“中文小写数字”选项，“确定”退出，将“星期数”设置成中文小写形式；选中H1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“时间”选项，再在右侧“类型”下面选中一款时间格式，“确定”退出。

利用Excel制作万年历（图解）步骤方法一：在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,F 14=11),30,31))回车。

第二步：B3中输入=IF(WEEKDAY(DATE($D$14,$F$14,1),2)=B4,1,0)回车。

选中B3向右复制公式至H3。

第三步：B6中输入=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。

用EXCEL制作一份万年历今天我们介绍用Excel制作万年历的方法。

这个万年历可以显示当月的月历，还可以随意查阅任何日期所属的月历，非常方便。

如果你愿意，还可以让它在特殊的日子里显示不同的提醒文字，一起来试试吧！本文所涉及到的函数有：1、(logical1,logical2, ...)2、3、4、5、6、7、8、1、启动EXCEL2003，新建一个工作表，取名保存（如万年历.xls），并在相应的单元格中，输入如图1所示的文本。

2、同时选中B1、C1、D1单元格，按“格式”工具栏上的“合并及居中”按钮，将其合并成一个单元格，并输入公式：=TODAY（）。

选中B1（合并后的）单元格，执行“格式→单元格”命令，打开“单元格格式”对话框（如图2），在“数字”标签中的“分类”下面选中“日期”选项，再在右侧“类型”下面选中“二○○一年三月十四日”选项，“确定”退出，将日期设置成中文形式。

注意：TODAY（）函数用于提取当前系统日期，请将系统日期一定要调整准确哟。

3、选中F1单元格，输入公式：=IF(WEEKDAY(B1,2)=7,"日",WEEKDAY(B1,2))；选中H1单元格，输入公式：=NOW（）。

选中F1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“特殊”选项，再在右侧“类型”下面选中“中文小写数字”选项，“确定”退出，将“星期数”设置成中文小写形式；选中H1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“时间”选项，再在右侧“类型”下面选中一款时间格式，“确定”退出。

注意：①上述前面一个公式的含义是：如果（IF）当前日期（B1）是星期“7”（WEEKDAY(B1,2)=7），则在F1单元格中显示“日”，否则，直接显示出星期的数值（WEEKDAY(B1,2)）。

②上述第二个函数（NOW（））用于提取当前系统日期和时间，也请将系统日期和时间调整准确。

今天我们介绍用Excel制作万年历的方法。

这个万年历可以显示当月的月历，还可以随意查阅任何日期所属的月历，非常方便。

如果你愿意，还可以让它在特殊的日子里显示不同的提醒文字，一起来试试吧！本文所涉及到的函数有：1、AND (logical1,logical2, ...>2、DATE (year,month,day>3、DAY (serial_number>4、IF (Logical,Value_if_true,Value_if_false>5、INT (number>6、MONTH (serial_number>7、NOW (>8、OR (logical1,logical2, ...>b5E2RGbCAP1、启动EXCEL2003，新建一个工作表，取名保存<如万年历.xls），并在相应的单元格中，输入如图1所示的文本。

p1EanqFDPw注意：TODAY<）函数用于提取当前系统日期，请将系统日期一定要调整准确哟。

3、选中F1单元格，输入公式：=IF(WEEKDAY(B1,2>=7,"日",WEEKDAY(B1,2>>；选中H1单元格，输入公式：=NOW<）。

5PCzVD7HxA选中F1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“特殊”选项，再在右侧“类型”下面选中“中文小写数字”选项，“确定”退出，将“星期数”设置成中文小写形式；选中H1单元格，打开“单元格格式”对话框，在“数字”标签中的“分类”下面选中“时间”选项，再在右侧“类型”下面选中一款时间格式，“确定”退出。

jLBHrnAILg注意：①上述前面一个公式的含义是：如果<IF）当前日期<B1）是星期“7”<WEEKDAY(B1,2>=7），则在F1单元格中显示“日”，否则，直接显示出星期的数值<WEEKDAY(B1,2>）。

Excel公式和函数典型案例—万年历万年历只是一种象征，表示时间跨度大，即记录一定时间范围内（比如100年或更多）的具体阳历与阴历的日期的年历，从而方便用户查询使用。

本例通过日期和时间函数，可以显示当月的日期，还可以随意查阅任何日期所属的日期。

1．练习要点●日期和时间函数●数据有效性●应用艺术字2．操作步骤：在制作本例的过程中，由于步骤比较繁杂，所以从制作过程和美化过程考虑，可以将其划分为两大部分。

第一部分：制作万年历（1）新建一张空白工作表，插入一个“填充-强调文字颜色2，暖色粗糙棱台”样式的艺术字。

然后更改艺术字文字为“万年历”，效果如图3-62所示。

图3-62 插入艺术字提 示 选择【插入】选项卡，单击【文本】组中的【艺术字】下拉按钮，选择合适的艺术字选项，即可插入艺术字。

（2）选择插入的艺术字，在【字体】组中，设置【字体】为“隶书”；【字体颜色】为“黄色”，如图3-63所示。

图3-63 设置字体（3）在工作表中，输入相应的数据信息，如图3-64所示。

图3-64 输入数据信息（4）选择D8单元格，输入“=TODAY()”公式，计算系统当前日期。

然后，合并D8至F8单元格区域，如图3-65所示。

图3-65 计算系统日期插入艺术字选择输入效果设置输入单击（5）选择B8单元格，在【设置单元格格式】对话框中，选择【分类】栏中的【日期】选项，并在【类型】列表中，选择合适的日期格式，如图3-65所示。

图3-65 设置单元格格式提 示 单击【数字】组中的【对话框启动器】按钮，即可弹出【设置单元格格式】对话框。

（6）选择H8单元格，输入“=IF(WEEKDAY(D8,2)=7,"日",WEEKDAY(D8,2))”公式，即可求出为一星期的第几天，效果如图3-66所示。

图3-66 计算星期数（7）选择H8单元格，并在【设置单元格格式】对话框中，选择【分类】栏中的【特殊】项，并选择【类型】栏中的【中文小写数字】项，如图3-67所示。