1.不可思议！农历年历用excel居然可以制作万年历
2.求一份excel万年历，年l万需要含公历和农历
3.利用excel制作一个十二星座的历源万年历
4.EXCEL万年历模块有没有带阴历和国家法定假日的

不可思议！用excel居然可以制作万年历

       用excel制作万年历其实并不复杂，阴历以下是制作我的操作流程与经验分享。

       首先，农历年历我爱代挂源码下载明确万年历的年l万布局，定义查询条件。历源在J列和K列中，阴历列出年月，制作通过数据验证建立下拉选项C1和E1。农历年历

       接着，年l万在C处输入公式=TODAY()，历源显示今天日期；F处使用=IF(WEEKDAY(C,阴历2)=7,日,WEEKDAY(C,2))显示今天是星期几；H处使用=NOW()显示当前时间。

       核心步骤是制作创建日历面板。在A3区域输入公式：=IF(OR(E1=1,E1=3,E1=5,E1=7,E1=8,E1=,E1=),,IF(OR(E1=4,E1=6,E1=9,E1=),,IF(MOD(C1,4)=0,,)))，判断当前月份的天数。

       接着在B3输入公式=IF(WEEKDAY(DATE($C$1,$E$1,1),2)=B4,1,0)，并拖动到H3，计算选择年份月份的第一天是星期几。在B7输入公式=IF(B3=1,1,0)，判断第一天是否是星期日。在B8输入公式=H7+1，让上一行的下一日换行显示，填充到B。ddoscms源码

       在B输入公式=IF(H=A3,0,H+1)，判断是否已经超过当前月份的天数。在B输入公式=IF(H=A3,0,IF(H,H+1,0))，继续判断是否超出，如果超出显示0。

       在C7输入公式=IF(B,B7+1,IF(C3=1,1,0))，显示当前日期，填充到H7。在C8输入公式=C8+1，显示下一日，填充到H。在C输入公式=IF(B=$A$3,0,IF(B,B+1,IF(C7=1,1,0)))，显示日期，如果超出显示0，填充到C和H。

       在excel设置中将0的部分不显示。最后，隐藏不需要显示的列或行，修饰文字和单元格边框，完成所有操作。

       若想将公历转换为农历，并显示节日信息，可参考以下思路：查找公历与农历对应表，创建对应公式；利用节假日列表，blackboard 源码添加相关公式或条件判断。

求一份excel万年历，需要含公历和农历

       下面提供所需公式，请自己灵活运用：

       1、在A2单元格输入起始公历日期，格式为--

       2、在A3单元格输入公式=TEXT(TEXT(TEXT(A2,"yyyymmdd"),"--")+1,"yyyy-mm-dd")并下拉填充得公历日期，格式同上。

       3、在B3单元格输入公式=TEXT(A3,"yyyy年m月d日")并下拉填充得公历日期，格式年月2日

       4、在C3单元格输入公式=CHOOSE(WEEKDAY(A3,2),"星期一","星期二","星期三","星期四","星期五","星期六","星期日")并下拉填充得星期几，格式星期二

       5、在D3单元格输入公式=TEXT(A3,"[$-]yyyy年m月"&IF(LEN(--TEXT(A3,"[$-]dd"))=1,"初","")&"d")并下拉填充得农历，格式年月日

       6、在E3单元格输入公式=MID("甲乙丙丁戊己庚辛壬癸",MOD(TEXT(A3,"[$-]e")-4,)+1,1)&MID("子丑寅卯辰巳午未申酉戌亥",MOD(TEXT(A3,"[$-]e")-4,)+1,1)&"年"&TEXT(A3,"[$-][DBNum1]m月d日")并下拉填充得农历，格式甲午年十一月十一日

       7、在F3单元格输入公式=CHOOSE(MOD(YEAR(A3)-,)+1,"庚","辛","壬","癸","甲","乙","丙","丁","戊","己")&CHOOSE(MOD(YEAR(A3)-,)+1,"子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥")&TEXT(A3,"[dbnum1][$-]年m月"&IF(--TEXT(A3,"[$-]d")<,"初","")&TEXT(A3,"[dbnum1][$-]d"))并下拉填充得农历，格式甲午年十一月十一

利用excel制作一个十二星座的万年历

       揭去年最后一页日历，年踏着轻快的脚步靠近了我们。每到新的一年，必须要做的一件事就是更换办公桌上的旧台历，年复一年，是seekbar 源码不是觉得麻烦？今天，让我们通过Excel打造一款万年历，不但可以随时翻看——之间任何一年的日期，还配有十二星座图案，非常漂亮。

       一、定制日历的框架

       第一步：运行Excel ，将“Sheet1”工作表改名为“万年历”。按Ctrl+A组合键将整个工作表选中，然后执行“格式→列→列宽”命令，在弹出的对话框中输入“2.4”，单击“确定”按钮将整个工作表的列宽调整为2.4。

       第二步：选中R5——X6单元格，右击选中的区域，在右键菜单中选择“设置单元格格式”命令，再在单元格格式对话框的“对齐”选项卡中选中“合并单元格”项将所选单元格合并。等万年历最终制作完成后，只要在这里输入要生成日历的年份，按回车键就可以自动生成该年份十二个月的日历了。

       小提示

       通过下拉列表选择年份

       在R5单元格中，除了手工输入外，我们还可以设置一个下拉列表供使用者选择：选中BD1单元格（选择BD列主要是为了不让该列数字显示在主界面上，影响美观）并输入“”，选中BD2单元格并输入“”，同时选中这两个单元格后拖动右下角的libesmtp源码“填充柄”以序列方式填充下面的单元格至数字；点击选中刚才合并的R5单元格，执行“数据→有效性”命令，在“数据有效性”对话框中的“允许”下拉菜单中选择“序列”，在“来源”栏中输入公式“=$BD$1:$BD$”（见图1），点击“确定”按钮，此时，只要选中R5单元格，其右侧就会出现一个小按钮，点击它即可在下拉列表中选择年份了（年——年）。

       图1

       第三步：选中F——L单元格，将其合并，输入“January”（一月），将其居中并设置适当的字体及大小；然后依次在F——L单元格中输入星期的英文缩写（如：Sun、Mon、Tue等，你也可以用中文的“日”、“一”、“二”来代替）；接下来点击“插入→→来自文件”命令，插入事先准备好的十二星座（可从本文提供的下载包中获得），调整第行的行高使其与的高度一致。最终生成的万年历，在星期的下方会自动生成日期，所以这里我们为日期预留6行的空格。按同样的方法可以制作出其余个月的日历，如图2所示。

       图2

       二、给日历穿上美丽外衣

       下面我们对刚刚制作好的日历进行进一步的美化。

       第一步：执行“格式→工作表→背景”命令，在对话框中选择准备好的背景（本文的素材包中有提供），为工作表添加一个背景。

       第二步：选中E9——AK单元格区域，右击选中的区域，从右键菜单中选择“设置单元格格式”命令。在打开的单元格格式对话框的“图案”选项卡中，设置“单元格底纹”为白色；在“边框”选项卡中为此单元格区域设置一个“淡蓝”色的粗实线边框。

       第三步：选中A列、B列、AN——AZ列、第1行、2行及第——行（按Ctrl键可以复选），将“单元格底纹”设置为白色，这样设置的目的是为了突出显示日历的主体部分，为了美观，我们可再为C3——AM单元格区域添加一个黑色的细实线边框。

       第四步：选中每月星期六、星期日及其下方对应的6行单元格，右击调出单元格格式对话框，在“字体”选项卡中将字体颜色设置为红色。然后，分别设置年份及月份名称的字体颜色、字体样式、字号。

       第五步：年份（R5）单元格显得有些单调，我们为它添加一个边框装饰一下。分别选中O4——AA7及L5——AD6单元格区域，为这两个区域各添加一个彩色的双线边框，添加完成后调整一下4行及7行的高度，这样可使边框看起来更加美观。

       第六步：单击“工具→选项”命令，在选项对话框的“视图”选项卡中，单击取消对“网格线”项的选项，这样可隐藏工作表中的网格线。至此，本例万年历的界面就设计完成了（见图3）。

       图3

       三、制作万年历

       前面我们已经给日历披上了漂亮的外衣，接下来要为它填充实际的内容，让它能晓过去、知未来，成为一个真正的万年历。

       如果我们知道了某年某月的1日是星期几，那么在Excel中自动排列那个月的日期就非常容易了：只要用前面的单元格加1就可以按顺序排列日期序列了，也就是说，只要我们解决了自动识别每月1日是星期几，再结合大月、小月及闰年的识别，就可以实现任意年份日历按月自动排列的功能了。下面简单介绍一下这种方法的思路。

       第一步：

       选中F单元格，输入公式“=IF(WEEKDAY(DATE($R$5,1,1),2)=7,1,"")”（不含最外层的引号，下同）。上面公式的含义是：假如“R5”单元格中输入的年份1月1日是星期天，则在F单元格中显示“1”，否则什么都不显示。

       第二步：

       选中G单元格，输入公式“=IF(F>"",F+1,IF(WEEKDAY(DATE($R$5,1,1),2)=1,1,""))”，这个公式的含义是：如果F单元格不为空，则执行F单元格中的数字加1，否则再进行“R5”单元格中输入年份的1月1日是否是星期一的判断。

       第三步：

       拖动G单元格的“填充柄”复制公式到H——L单元格中，分别选中H——L单元格，手动调整每个单元格中“WEEKDAY”函数的判别值，即等号右边的数字，依次改成2、3、4、5、6，使其与星期相对应。

       第四步：

       选中F单元格（即一月份第二个星期相对应的单元格），输入公式“=L+1”（L为上一行中的最后一个单元格），在G单元格输入公式“=F+1”，然后，拖动“填充柄”填充H——L单元格即可。以同样的方法，在下面的4行中输入对应的公式，不过一定要注意换行时单元格的引用。

       第五步：

       重复上述操作，分别设置后面个月份的日期序列，在设置时需注意，在对每个月1日是星期几的识别公式中，将“DATE”函数中的月份值与实际的月份值相对应，如：设置2月份日历时，“DATE”函数的表达式应是“=DATE($R$5,2,1)”。

       限于篇幅，上面还只是一个简单的介绍，还没有解决大、小月、闰月、日期出现大于“”的现象等。具体设置，大家可参考本文所提供下载包中的“万年历.xls”文件。另外，这样一行一行地复制公式，方法比较烦琐，大家还可以参考下载包中的“yearly_calendar.xls”文件，学习一下如何通过Excel高级功能，完全实现自动日历更新的，不过这需要对Excel有更深入的了解。

EXCEL万年历模块有没有带阴历和国家法定假日的

       有的，我制作的一个“Excel农历插件”即可实现你要的功能，是目前网上最好的Excel农历解决方案，已经发布在网上了，请搜索上文中引号内的内容，插件名称：LunarX.xll。