1、新年伊始，制作一个新年万年历送给别人新年的祝福，这份心意是非常重要的。制作新年万年历有很多办法，但用 Office 的 Excel 表格制作你又试过没？下面给大家介绍用 Excel 制作万年历。 今天我们介绍用 Excel 制作万年历的方法。这个新年万年历可以显示当月的月历，还可以随意查阅任何日期所属的月历，非常方便。如果你愿意，还可以让它在特殊的日子里显示不同的提醒文字，一起来试试吧！ 本文所涉及到的函数有： 1、AND (logical1,logical2, .) 2、DATE (year,month,day) 3、DAY (serial_number) 4、IF (Logical,Val
2、ue_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），在“数字”标签中的“ 分类”下面
3、选中“日期”选项，再在右侧“ 类型”下面选中“ 二 一年三月十四日” 选项，“确定”退出，将日期设置成中文形式。 注意：TODAY （）函数用于提取当前系统日期，请将系统日期一定要调整准确哟。3、选中 F1 单元格，输入公式：=IF(WEEKDAY(B1,2)=7,“日“,WEEKDAY(B1,2)；选中 H1 单元格，输入公式：=NOW（）。 选中 F1 单元格，打开“单元格格式”对话框，在“ 数字 ”标签中的“分类” 下面选中“特殊”选项，再在右侧“类型”下面选中“ 中文小写数字” 选项，“确定”退出，将“ 星期数”设置成中文小写形式；选中 H1 单元格，打开“单元格格式”对话框，在“ 数
4、字” 标签中的“分类”下面选中“时间”选项，再在右侧“ 类型”下面选中一款时间格式，“确定” 退出。 注意：上述前面一个公式的含义是：如果（IF）当前日期（B1 ）是星期“7” （WEEKDAY(B1,2)=7），则在 F1 单元格中显示“日” ，否则，直接显示出星期的数值（ WEEKDAY(B1,2)）。 上述第二个函数（NOW（）用于提取当前系统日期和时间，也请将系统日期和时间调整准确。 4、在 I1、I2 单元格分别输入 1900、1901，然后同时选中 I1、I2 单元格，用“ 填充柄”向下拖拉至I151 单元格，输入 19002050 年份序列。 同样的方法，在 J1 至 J12 单
5、元格中输入 112 月份序列。 5、选中 D13 单元格，执行 “数据有效性”命令，打开“ 数据有效性”对话框（如图 3），按“允许”右侧的下拉按钮，选中“序列”选项，在“来源” 下面的方框输入：=$I$1:$I$151，“ 确定”退出。 同样的操作，将 F13 单元格数据有效性设置为“=$J$1:$J$12”序列。 注意：经过这样的设置以后，当我们选中 D13（或 F13）单元格时，在单元格右侧出现一个下拉按钮，按此下拉按钮，即可选择年份（或月份）数值，快速输入需要查询的年、月值。 6、选中 A2 单元格（不一定非得是 A2 哟），输入公式：=IF(F13=2,IF(OR(D13/400=I
6、NT(D13/400),AND(D13/4=INT(D13/4),D13/100 INT(D13/100)，则该月为 29 天（也就是我们通常所说的 “闰年”），否则为 28 天。如果“月份”不是 2 月，但是 “4、6、9、11” 月，则该月为 30 天。其他月份天数为 31 天。7、选中 B2 单元格，输入公式：=IF(WEEKDAY(DATE($D$13,$F$13,1),2)=B3,1,0)。再次选中 B2 单元格，用“填充柄”将上述公式复制到 C2H2 单元格中。 注意：上述 B2 公式的含义是：如果“查询年月” 的第 1 天是星期“7”（WEEKDAY(DATE)($D$13,$F
7、$13,1),2)=B3）时，在该单元格显示 “1”，反之显示 “0”），为“查询年月”获取一个对照值，为下面制作月历做准备。 上述 C2H2 单元条中公式的含义与 B2 相似。 在用拖拉法复制公式时，公式“绝对引用” 的单元格（加了 “$”号的，如“$D$13”等）不会发生改变，而“相对引用” 的单元格（没有加“$”号的，如“B3”等），则会智能化地发生变化，例如在 E2 单元格中，“B3”变成了“E3”，整个公式成为：=IF(WEEKDAY(DATE($D$13,$F$13,1),2)=E3,1,0)。 8、选中 B6 单元格，输入公式：=IF(B2=1,1,0)。选中 B7 单元格，输入
8、公式：=H6+1。用“填充柄”将 B7 单元格中的公式复制到 B8、B9 单元格中。 分别选中 B10、B11 单元格，输入公式：=IF(H9=A2,0,H9+1)和=IF(H10=A2,0,IF(H100,H10+1,0)。选中 C6 单元格，输入公式：=IF(B60,B6+1,IF(C2=1,1,0)。用“填充柄” 将 C6 单元格中的公式复制到 D6H6 单元格中。 选中 C7 单元格，输入公式：=B7+1。用“ 填充柄”将 C7 单元格中的公式复制到 C8、C9 单元格中。同时选中 C8C9 单元格，用“ 填充柄”将其中的公式复制到 D8H9 单元格中。 选中 C10 单元格，输入公式
9、：=IF(B10=$A$2,0,IF(B100,B10+1,IF(C6=1,1,0)。用“填充柄”将C10 单元格中的公式复制到 D10H10 单元格和 C11 单元格中。至此，整个万年历（其实没有万年，只有从 19002050 的 151 年）制作完成。 下面，我们一起来将其装饰一下。 9、同时选中 I 列和 J 列，右击鼠标，选“隐藏” 选项，将相应的列隐藏起来，使得界面更加友好。用同样的方法，将第 2 和第 3 行也隐藏起来。选中相应的单元格，利用工具栏上的相应按钮，设置好字体、字号、字符颜色等。 选中相应的单元格，打开“单元格格式” 对话框，在“对齐”标签下，设置好单元格中文本的对齐方
10、式（通常情况下，垂直对齐可以一次性设置为“居中” ，水平 “对齐”根据具体情况设置）。 10、选中 B5H11 单元格区域，打开“ 单元格格式”对话框，进入“ 边框”标签，选择好“颜色、样式” ，并“预置” 好边框范围，然后“ 确定” 退出，为月历加上边框。 11、执行“工具选项” 命令，打开“选项” 对话框（如图 4），在“视图”标签下（通常是默认标签），清除“零值” 和“网格线”复选框中的“”号，“ 确定”退出，让“ 零值”和“网格线” 不显示出来。 12、将 B14H14 和 B15H15 单元格分别合并成一个单元格，并在 B14 和 B15 单元格中输入公式：=IF(AND(MONTH
11、(D1)=1,DAY(D1)=1),“新年新气象！加油呀！ “,IF(AND(MONTH(D1)=3,DAY(D1)=8),“ 妇女能顶半边天！“,IF(AND(MONTH(D1)=5,DAY(D1)=1),“劳动最光荣“,IF(AND(MONTH(D1)=5,DAY(D1)=4),“青年是祖国的栋梁“,IF(AND(MONTH(D1)=6,DAY(D1)=1),“原天下所有的儿童永远快乐“,0)和=IF(AND(MONTH(D1)=7,DAY(D1)=1),“ 党的恩情永不忘 “,IF(AND(MONTH(D1)=8,DAY(D1)=1),“提高警惕，保卫祖国！“,IF(AND(MONTH(
12、D1)=9,DAY(D1)=10),“老师，您辛苦了！“,IF(AND(MONTH(D1)=10,DAY(D1)=1),“祝我们伟大的祖国繁荣富强 “,0)。 设置好 B14 和 B15 单元格的字体、字号、字符颜色。 注意：上述公式的含义是：如果当前日期逢到相关的节日（如“元旦” 等），则在 B14 或 B15 单元格显示出相应的祝福语言（如“新的新气象！加油呀！” ，参见图 5）。 由于 IF 函数只能嵌套 7 层，而节日数量超过 7 个（我们这里给出了 9 个），因此，我们用两个单元格来显示。 13、执行“ 格式 工作表背景” 命令，打开“工作表背景”对话框（如图 6），选择一张合适的图
13、片后，按“插入”按钮，将其衬于工作表文字下面。 14、在按住“Ctrl”键的同时，单击 D13 和 F13 单元格，同时选中两个单元格，开“单元格格式”对话框，切换“保护” 标签（如图 7），清除“锁定” 前面复选框中的“” 号，“确定”退出。 15、执行“工具保护保护工作表” 命令，打开“保护工作表 ”对话框（如图 8），两次输入密码后，确定退出。 注意：经过这样的设置后，整个工作表中除了 D13 和 F13 单元格中的内容可以改变外，其它单元格中的内容均不能改变，保证了万年历的使用可靠性闰年怎么算的方法闰年怎么算，回答这个问题之前，我们先来了解一些关于平年和闰年的一些知识。第一，什么是闰年
14、什么是闰年呢？闰年就是为了弥补因人为历法规定造成的年度天数与地球实际公转周期的时间差而设立的。补上时间差的年份,即有闰日的年份为闰年。地球绕太阳运行周期为 365 天 5 小时 48 分 46 秒（合 365.24219 天），即一回归年（tropical year）。公历的平年只有 365 日，比回归年短约 0.2422 日，每四年累积约一天，把这一天加于 2 月末（2 月 29 日），使当年的历年长度为 366 日，这一年就为闰年。 按照每四年一个闰年计算，平均每年就要多算出 0.0078 天，经过四百年就会多出大约 3 天来，因此，每四百年中要减少三个闰年。所以规定公历年份是整百数的，必
15、须是 400 的倍数才是闰年，不是 400 的倍数的就是平年。比如，1700 年、1800 年和 1900 年为平年，2000 年为闰年。第二，闰年怎么算明白了下面的闰年规则，就明白闰年怎么算。公历闰年判定遵循的规律为：四年一闰，百年不闰，四百年再闰。公历闰年的精确计算方法：（按一回归年 365 天 5 小时 48 分 45.5 秒） 、普通年能被 4 整除且不能被 100 整除的为闰年。（如 2004 年就是闰年,1901 年不是闰年） 、世纪年能被 400 整除的是闰年。( 如 2000 年是闰年，1900 年不是闰年) 、对于数值很大的年份,这年如果能整除 3200,并且能整除 1728
16、00 则是闰年。如 172800 年是闰年，86400 年不是闰年(因为虽然能整除 3200，但不能整除 172800)（此按一回归年 365 天 5h4845.5计算）。 第三，excel 中闰年怎么算1900 年是不是闰年？在论坛里大家常在交流 1900 年是不是闰年这个话题。根据上面介绍这些闰年的知识和计算规则，可以知道 1900 年不是闰年。Microsoft Excel 完全能正确地处理所有其他闰年，包括不是闰年（例如 2100 年）的世纪年份。仅 1900 年不能正确的处理。关于 1900 年是不是闰年，原因和解释归纳整理如下：当第一次发布 Lotus 1-2-3 时，则程序假定为
17、 1900 年是一个闰年即使实际上不是闰年。这很容易对程序处理的闰年，导致 Lotus 1-2-3 中的几乎所有的日期计算为不会造成损害。当发布 Microsoft Multiplan 和 Microsoft Excel 时，他们还认为 1900 年是闰年。此假设允许 Microsoft Multiplan 和 Microsoft Excel 以使用相同的序列日期系统使用 Lotus 1-2-3，并提供更大的兼容性与 Lotus 1-2-3。尽管从技术角度来说可能会纠正此行为，以便当前版本的 Microsoft Excel 不要假设 1900 年为闰年的这样缺点超过优点。如果要更正此问题，将出
18、现许多问题包括以下：当前的 Excel 工作表和其他文档中的几乎所有日期将会都减少一天。更正这一转变需要花费相当长的时间和精力，尤其是在使用日期的公式。例如，在工作日函数的某些功能就会返回不同的值； 这可能会工作不正确的工作表中的公式。更正此行为会破坏 Microsoft Excel 和其他程序来使用日期之间的序列日期兼容性。 如果该行为将保留 uncorrected，就会出现只能有一个问题：工作日函数返回不正确的值为 1900 年 3 月 1 之前的日期。因为大多数用户不能使用 1900 年 3 月 1 之前的日期这一问题很少发生。第四，闰年怎么算的公式通过下面 A 列的年份，来判断是闰年还
19、是平年。闰年怎么算的公式写法多种，归纳如下：=IF(MOD(A2,400)=0)+(MOD(A2,4)=0)*MOD(A2,100),“闰年“,“平年“)=IF(OR(MOD(A2,400)=0,AND(MOD(A2,4)=0,MOD(A2,100),“闰年“,“平年“)=IF(DAY(EOMONTH(DATE(A2,3,),0)=28,“平年“,“闰年“)=TEXT(DAY(EOMONTH(DATE(A2,3,),0),“=28平年;闰年“)=TEXT(A2+400;平年“)=TEXT(A2+400);平年“)=IF(COUNT(-(A2+400);平年; 平年“)=IF(DAY(EOMONTH(DATE(A2,2,1),0)=28,“平年“,“闰年“)
