如果有兴趣编写程序的，我可以提供转换函数库，调用一个函数就可以实现农历与公历的互转了 目前我已经完美地实现了转换，如果需要，我可以提供 Excel 中阳历日期如何转换成阴历日期？ 2007版的excel可用下面公式转换 =TEXTA1，$；根据阳历年份推算农历年份#160 #160 #160 #160 #160 #160 #160 #160 #160 #160 #160 公元年数先减三，基数#160 #160 #160 #160 #160 #160 #160；在EXCEL中怎样把公历转换成农历 Dim WeekName7， MonthAdd11， NongliData99， TianGan9， DiZhi11， ShuXiang11， DayName30， MonName12 Dim curTime， curYear， curMonth， curDay， curWeekday Dim GongliStr；阴历，中国传统历法之一，也被称为旧历汉历古历等，辛亥革命后改用西方太阳历公历，而近现代使用的农历属于阴阳合历，也就是阴历和阳历的合历阴历，其计算方法是以太阴圆缺一周为一月，历时29日12小时44分2。
公历和农历的转换 很多人都一直在找换阴阳历的公式不过由于月球转动的不稳定不规则，因此无公式可寻，也就是说公历和农历的转换没有计算方式，这也是古代中国每百年必改历的原因公历和农历生日多久重合一次 一般每隔十九；但因为农历与公历的准确天数都不是整数，农历和公历在19年中的天数也有细微的差别经过几十年甚至上百年的积累，当小数变成了整数时，两种历法生日才会完全重合更多的时候是相差一天另外值得一提的是，2月29日出生的人，在。
因2099年五月初一日包括该年闯二月在公历6月19日，加上计算所得的13日为龙德二年六月初一日的公历月日，即该年7月2日，则该年农历六月二十一日为该年7月22日 3计算结果的订正 实际上上列公历换算为农历时常有较大的误差，如；日期转换为农历日期的算法是什么 excel公历转农历方法一使用text函数 A列是公历日期，我们在B1单元格输入公式=TEXTA1，$yyyy年m月IFLENTEXTA1，$dd=1，初，d，下拉完成公历转农历；DBNum1m月d日quot请点击输入图片描述 输入函数后，回车确定，就能将公历日期转换成农历日期了请点击输入图片描述 下面就是最后转换为农历日期填充的效果了，如果日期较多，可以批量填充函数即可请点击输入图片描述。
Function iNlStriDate As Date As String #39公历转农历 If Not tf Then Call 加载数组们 Dim i%， t， k%， m%， n%， ext%， bit #39计算从192128即1921年的正月初一至目标日期的总天数 t = iDate；因此，公历规定每4年里有1个闰年，将这一天加在天数最少的2月，故闰年的2月有29天实际操作中为了方便，规定凡是能被4除尽的年份末尾有两个0的要被400除尽，皆为闰年如1996，2000等皆为闰年农历也是“阴。
A2输入西历日期 农历公式=quot农历quotTEXTA2，quot$m月d日quot或A2自订格式为$农历m月d日 农历闰月月份会加 1，如润7月会显示8月，8月顺延为9月，12月顺延为13月以上适用於Excel2007版以；无论回历换算为公历或相反，大体都有一日之差，以星期序数订正时，回历换算为公历，以回历的星期序数为准相反，以公历的星期序数为准 四 国历或公历换算为中国农历 1回历换算为农历 仅管中国农历各年在年内月数日数都不是一个；excel公历转农历方法一使用text函数 假设A列是公历日期，A1是公历日期，我们在B1单元格输入公式=TEXTA1，quot$yyyy年m月quotIFLENTEXTA1，quot$ddquot=1，quot初quot，quotquotquotdquot，下拉完成公历转；公历转农历公式公历农历转换 农历也是“历”，又称为夏历阴历旧历，是东亚传统历法之一农历属于一种历，平均历月等于一个朔，但设置闰月以使平均历年为一个回归年，设置二十四节气以反映季节太阳直射点的周年；如果有兴趣编写程序的，我可以提供转换函数库，调用一个函数就可以实现农历与公历的互转了 目前我已经完美地实现了转换，如果需要，我可以提供 日期里的农历公历阴历阳历怎么换算？ 百度一下 太复杂了 自己研究 农历转换公历对照表。
