excel如何显示农历？

快乐男厨师 2017-12-26

展开全文

通过EXCEL自身的函数等，我们也能够在一张工作表制作一个万年历。

具体包括：1、表单控件3个（滚动条2、按钮1），2、条件格式3个（数据条、公式规则），3、数组函数1类（day、weekday），4、名称1个，5、图形对象1个，6、VBA代码及指定宏，7、自定义格式与TEXT函数。

岁末年初、还在等别人送台历吗？求人不如求己，用EXCEL自己也能搞，而且能够用一辈子。

下面这个图就是制作的月历，我们将它分成ABCDE 5个区域来分析:

A区：年份和月份，可以随时变化的，但不应该在上面直接输入，年份是纵向排列的，月份是根据小写的数字1-12自动转换为大写的，还有一个向下的箭头形状；

B区：插入我们自己喜欢的图片；

C区：表示星期的区域，可以直接输入大写的一到日，但我们这里用公式来设定它；

D区：放置本月第一周的日期和同一周上月份的日期；

E区：放置本月最后一周的日期和同一周下月份的日期，因为各月的天数不同，有可能本月最后一天位于倒数第二行；

下面，我们就来一步一步地学起来：

1、制作年份标签。点击EXCEL主界面“插入”选项卡内“形状”项，在弹出的菜单“箭头总汇”下点击“五边形”（图二之1），注意不要点击“流程图”下的“离页连接符”（图二之2）。

在工作表任意位置画出五边形，松开鼠标，五边形周边出现8个白色的定位空心小圆（图二之3），用鼠标拖拉它们可以改变五边形的大小，在五边形上移动鼠标直到光标变为四向小箭头时，可移动其位置。

点击图二之4和5选择一个自己喜欢的样式和五边形内文字的格式。在公式编辑栏fx后面输入“=D16”，让其中的文字跟随单元格D16变化而变化。点击EXCEL主界面“开始”选项卡内“字体”组内有关项，可以改变文字的大小，颜色等。

点中图二之6可顺时针旋转五边形的方向。

2、设置月份。在单元格B7输入公式“=MID(TEXT(E16,'[dbnum1]'),LEN(E16),LEN(E16))&'月'”，目的是将E16内的1、2、3…11、12转换为“一、二、三、一十一、一十二”后加上“月”字。其中“[dbnum1]”内置格式是决定转换的核心。

至此，完成图一中的A。

3、插入图形。点击EXCEL主界面“插入”选项卡内“图形”项，选择你电脑上的一张自己喜欢的图形作为月历的图画。在当前排版布局下，建议选择横版的照片。

图形插入后，同样在其四周出现小圆形的定位点，也改变其形状尺寸，拖移图形的位置。点击图形时，在EXCEL主界面出现“格式”菜单，点击“图片样式”组右下角的三角按钮，选中“金属圆角矩形”（图二之7）。

至此，完成图一中的B。

4、插入星期文字。在单元格B8输入公式“= TEXT(B9,'aaa')”，将数字转换成星期格式，数字1-7依次对应着星期日、一、二至六。公式核心是“aaa”，而公式“= TEXT(B9,'dd')”是取两位日期。将单元格B8公式向右拖拉至单元格H8。

至此，完成图一中的C。

5、设置名称。为下一步公式计算方便，点击EXCEL主界面“公式”选项卡内“定义的名称”组内的“定义名称”项（图三之1），调出“新建名称”对话框，在其中的“名称”输入“Wedate”，在其中的“引用位置”输入“={0,1,2,3,4,5,6} + {0;1;2;3;4;5}*7”。

6、插入日期。在第9-14行是用来存放日期的，需要逐行设置。选中单元格区域“B9:H9”，在公式编辑栏输入“= Wedate+DATE($D$16,$E$16,1)-WEEKDAY(DATE($D$16,$E$16,1),2)+1”，同时按下“CTRL_SHIFT_ENTER”三键完成数组公式的输入。

用同样的方法在单元格区域“B10:H10”、…单元格区域“B14:H14”逐一输入其他5行的数组公式，要注意将公式中的1依次改为8、15、22、19、36。

8、设置双休日字色。选中单元格区域“G9:G14”，设置字体颜色为绿色，选中单元格区域“H9:H14”，设置字体颜色为红色。

9、设置日期的条件格式。为使得日期的显示更符合人们的视觉习惯，将当月日期黑色显示，上月、下月的日期显示为灰色，选中单元格区域“B9:H9”，点击EXCEL主界面“开始”选项卡内“样式”组内的“条件格式”项，在弹出的菜单中点“数据条”下的“橙色数据条”（图四之1、2）。

点中图四之3的“新建规则”，弹出“新建格式规则”对话框，在“选择规则类型”内选择“使用公式确定要设置格式的单元格”，在“编辑规则说明”内输入“=DAY(B9)>8”，将上月大于数字8的日期设置为指定的格式，点击图四之5“格式”按钮，在弹出的对话框内点击“颜色”右下角的下拉三角形按钮,，选择图四之6的主题颜色。

至此，完成图一中的D。

用同样的方法在单元格区域“B10:H10”、…单元格区域“B14:H14”设置“橙色数据条”。

选中单元格区域“B13:H14”两行，新建规则的“规则说明”内输入“=AND(DAY(B13)>=1,DAY(B13)<>

至此，完成图一中的E。

看到这里，你是是不是学得这节课程要结束了？

然而，并没有完。因为，这才是讲了某一个月的月历制作，还不具有通用性，不能计算任意月份的月历叫什么万年历呢？

细心的同学也许已经看出了我们前面提到单元格D16和E16了，年份在任意的年份，月份只能在1-12之间输入，为了偷懒，不想动键盘输入，鼠标点点就出效果，可以吗？

来，一起往下走…

我们点击鼠标来改变相应单元格的值这样的动作叫做“驱动”，点击控件改变数值称之为“控件驱动数值”。

10、插入年份控件。点击EXCEL主界面“开发工具”选项卡内“控件”组内的“插入”项，在弹出的菜单中点击“表单控件”下的“数值调节钮”，移动鼠标到单元格D16附近，此时光标变为黑色加号，按下鼠标画出一块矩形，松开鼠标，点击“开发工具”选项卡内“控件”组内的“属性”项（图五之1-4），弹出“设置控件格式”对话框。

在图六之1的“控制”选项卡内依次输入“2018”（单元格D16的值）、“1950”（可以计算的最小的年份，我们这里设为1950年，也可以往前推，如1940等）、“2099”（可以计算的最大的年份，我们这里设为2099年，也可以往后推，如2150等）、“=$D$16”（被驱动的单元格）。

<--我的excel界面上，没有“开发工具”选项卡，怎么办？看文章最后啊>

11、插入月份控件。按照与步骤10相同的方法，插入一个新的“数值调节钮”，其控制选项卡设置如图六之2所示。

12、添加直接打印按钮。点击EXCEL主界面“开发工具”选项卡内“控件”组内的“插入”项，在弹出的菜单中点击“表单控件”下的“按钮”，移动鼠标到单元格H16附近（图七之1、2），此时光标变为黑色加号，按下鼠标画出一块矩形，松开鼠标，弹出“指定宏”对话框，注意“宏名”中“按钮6”数字6（图七之3），在你电脑上可能是其他数字，点击“新建”按钮（图七之4），在随后出现的VBE窗口中输入以下代码（图七之5和图八之1、2），点击“视图”（图七之6）按钮返回EXCEL，输入“立马打印月历”改变按钮上的文字。