在Excel中实现公历与农历互转

Excel农历插件Excel中另一种公历与农历互转的方法2016/6/11/10Excel中另一种公历与农历互转的方法前言：很多人都遇到过在Excel中将公历转换成农历的情况，而网上所给的方法，就是使用VBA宏或者Excel宏，这两者固然简单，但会出现安全警告，同时，支持的年份也只有200年，在某些特殊场合下不能满足要求，为此，特地开发一款带日期转换和天数计算的加载宏（LunarX.xll），来顺应需求，内置了公历、农历、节日、节气等多个日历元素。使用 说明 关于失联党员情况说明岗位说明总经理岗位说明书会计岗位说明书行政主管岗位说明书 ：函数及功能：1.XGToL：公历转农历；2.XLToG：农历转公历；3.XWeek：星期计算；4.XDays：天数差计算；5.XDate：日期计算；6.XSizhu：四柱查询；7.XSolarTerm：二十四节气查询；8.XDayInfo：每日信息；9.XDayInfoEx：查询某地日出、日落，天黑、天亮时刻；10.XDaysOfMonth：查询某个月的总天数；11.XDaysOfYear：查询某一年的总天数；12.XGetDateInYear：查询指定日期在某一年中对应的公历或农历日期。使用方法：1.安装加载宏：将LunarX.xll放至一个指定目录，打开Excel，在【文件】菜单中选择【选项】，点击选项后，出现如下界面，再点“加载项”。Office2003及以下版本请点【工具】中的【加载宏】。Excel农历插件Excel中另一种公历与农历互转的方法2016/6/12/10然后在下方的管理中选择“Excel加载项”并点击“转到(G)…”,出现如下的加载宏界面。Excel农历插件Excel中另一种公历与农历互转的方法2016/6/13/10请点击“浏览(B)…”，选择之前放LunarX.xll的目录下的“LunarX.xll”,确定即可，到这一步，加载宏安装完成。注意32位Office用32位的加载宏，64位Excel用64位的加载宏。点击“确定”后，可以看到，“Excel农历插件”前面的勾已经被选中，点击“确定”2.调用函数Excel农历插件Excel中另一种公历与农历互转的方法2016/6/14/10①公历转农历（XGToL）：注意，此时的单元格A1中的日期 格式 pdf格式笔记格式下载页码格式下载公文格式下载简报格式下载 只能是YYYY/MM/DD或YYYY-MM-DD。以上方法可以让A1单元格内的格式转换成其它格式，只用使用TEXT函数将日期格式化，还可以用“=XGToL(TEXT(A1,"YYYY-MM-DD"))”，效果是一样的。但这个方法有个缺点，如果日期时间是两位数的年份，如XX/2/5，刚会被Excel自动还原成19XX/2/5。本函数得到的农历日期，是以干支纪年再加上农历月日，农历本身无几几年的概念。②农历转公历（XLToG）：农历转换时，为了正确表示农历的时间，将岁次改成与公历同步的年份，格式：1999年正月初一。③星期计算（XWeek）星期计算支持公历日期和农历日期显示结果一致，说明计算正确。④计算天数差（XDays）：可支持以下几种计算方法：公历日期与公历日期之间的天数差公历日期与农历日期之间的天数差农历日期与农历日期之间的天数差Excel农历插件Excel中另一种公历与农历互转的方法2016/6/15/10注意，得到的天数是A2-A1，如果天数小于0，表示A1的日期晚于A2。⑤计算日期（XDate）：支持公历日期和农历日期注意，日期一定要在前面，天数在后面，天数负数，表示在A1单元格日期之前的日期。⑥计算四柱（XSizhu）：⑦查询节气（XSolarTerm）：用节气名称查询用节气编号查询，该年的第一个节气用编号“1”表示，比如第一个节气为“小寒”，则“2”表示大寒，……以此类推，直至该年的最后一个节气编号24为止。如果要查询指定节气，请使用节气名称来代替编号。Excel农历插件Excel中另一种公历与农历互转的方法2016/6/16/10⑧XDayInfo（请查看Demo.xls）⑨XDayInfoEx其余参数请参照“fx”中的函数参数说明来使用。⑩XDaysOfMonth支持yyyy/mm/dd，yyyy-mm-dd，yyyy/mm，yyyy-mm，以及农历年月，年月日等输入格式。⑪XGetDateInYear农历，最典型的日期为2017年的闰六月三十，以下就以该日期为例：公历，典型日期就是2月29日：Excel农历插件Excel中另一种公历与农历互转的方法2016/6/17/10通过以上函数，可以看出，日期会被自动转化，农历转化规则是：无闰月的年份查闰月则当作非闰月处理，无三十的月份查三十则当作廿九处理。公历转化规则是：2月无29日若查29日则当作28日来处理。⑫XDaysOfYear参数：缺省状态下获取到的结果为为公历年的总天数，与“gy”效果相同，而“ly”这个参数所获取到的结果表示农历年的总天数。详细信息请查看Demo.xls。3.参数说明以下给出参数列表，当参数不输入时，表示缺省参数，格式用默认方式输出。0：按照默认的格式输出1："y"2："m"3："d"4："hh"5："mm"6："ss"7："y/m"8："m/d"9："y/m/d"10："hh:mm"11："hh:mm:ss"12："y/m/dhh:mm"13："y/m/dhh:mm:ss"14："m/dhh:mm:ss"15："m/dhh:mm"16："ym"17："ymd"18："ymdh"19："年"20："月"21："日"Excel农历插件Excel中另一种公历与农历互转的方法2016/6/18/1022："时"23："分"24："秒"25："年月"26："月日"27："年月日"28："时分"29："时分秒"30："年月日时分"31："年月日时分秒"32："月日时分秒"33："月日时分"34："年月"35："年月日"36："年月日时"支持参数的函数：XGToL，XLToG，XDate，XSolarTerm和XGetDateInYear这5个函数，但每个函数支持的输出格式参数会有所不同，有些参数会不支持，详细说明这里不写了，请参照Demo.xls。XDayInfo的参数为：0缺省状态全部显示（即显示编号1-10的所有信息项，农历日优先级最低）1"st"显示节气2"lh"显示农历节日3"gh"显示公历节日4"sj"显示数九5"my"显示梅雨6"fr"显示伏日7"sr"显示社日8"ld"显示农历日9"lm"显示农历月10“lp”显示月相以上参数可以组合使用，多个参数之间请用“”（空格）隔开。以下参数请单独使用：11“co”显示星座（与节气同步）12"nh"显示年号13"md"显示次日公历日（当月）14"nd"显示次日公历日4.更新加载宏只要用新版本的加载宏替换掉旧版本即可（请在关闭Excel后进行替换操作）。注意：由于本加载宏在不断更新，为了保证用户能使用最新版本，将有一个使用期限，到期请更新即可。如需新版本，请发邮件来索取（邮箱见本文尾）。后续待版本稳定后，将发布长期有效的版本。5.启用、禁用加载宏打开加载项管理器，将“Excel农历插件”前面的勾去掉，点确定，出现如下对话框，表示禁用加载宏成功。Excel农历插件Excel中另一种公历与农历互转的方法你懂的：u3at9/10如果要启用，请将LunarX前面的勾选中，然后确定。6.需要使用“Excel农历插件”请用PDF阅读器打开本文档。（见本页页眉右侧）7.卸载加载宏关闭Excel，将加载宏从安装的位置移除（删除或移动到其它目录），再打开Excel，会出现以下提示信息：Excel农历插件Excel中另一种公历与农历互转的方法2016/6/110/10点击【确定】，打开加载项管理页面，点击列表中的LunarX，会出现以下提示信息。点击【是】，即可将加载宏卸载。8.更新加载宏目录请先卸载当前LunarX加载宏，然后关闭所有Excel，再打开，重新加载新目录下的LunarX.xll，再次关闭Excel，最后打开使用即可。9.其它说明：此加载宏目前支持所有版本Excel。本加载宏是免费的，请不要将其用于商业用途。如果在使用过程中遇到问题或有好的建议，请反馈。后续版本会改进。持续更新。