首页 > 农历转化成阳历

【阴历和阳历换算】

农历转换公历对照表是公历1945年4月29日星期日

公历和农历是如何换算的？每月初一叫做朔，最后一日叫做晦。农历十五或十六或十七叫做望，望的后一天叫做既望所以每年春节的大年三十并不在同一天。农历的基础是「回归年」和「朔望月」。「回归年」是太阳接连两次通过春分点所需的时间，即365.2422日(365日5小时48分46秒)。「朔望月」是月球接连两次朔(新月)或两次望(满月)相隔的时间，即29.5306日(29日12小时44分3秒)。

由于12个「朔望月」只有354.3672日，跟「回归年」的365.2422日相差超过10日，把相差累积起来便成为闰月。早在公元前五、六百年的春秋时代，中国历法便采用十九年七个闰月的安排

但中国的农历和***的农历以及韩国的农历计算方法不一样，一般要相差一二天。

阴历日期是以月亮的圆缺为计月单位，其以逢朔为初一，以月望为十五（大月为十六日），以月晦为二十九日（大月为三十日）。然而目前记时通常用阳历日期表达，如欲将阳历日期换算成阴历日期可以用以下两种方法：其一是查《新编万年历》，如查1984年6月8日是阴历几日？翻开万年历6月10日是阴历十一，则逆推6月8日是阴历初九。其二可以利用公式推算阴历日期：

设：公元年数－1977（或1901）＝4Q＋R

则：阴历日期=14Q+10.6(R+1)+年内日期序数-29.5n

（注:式中Q、R、n均为自然数，R农历和阳历转换有什么规律啊?没有。阳历是以地球围绕太阳公转一周的时间(即:365天5小时48分46秒,也就是365.2422天)为一年，为历法方便定为365天(称为平年)，舍去0.2骸22天，舍去的0.2422天，每4年累加为0.9688天，将近一天。因此，每四年加一天，既加在能被4整除的年份上，这一年为366天(称为闰年,即:2月份为29天)，每四百年少3.12天，也就是少三个闰年，所以逢百年时，既要被4整除也要被400整除才为闰年。也就是我们通常所说的：四年一闰，百年不闰，四百年再闰。

农历则是以月亮围绕地球公转一周的时间(即:平均29天12小时44分)为一个月，12个月算一年，为354天。每三年有一个闰月年，闰月年是383天或384天。19年7个闰月年。一般情况19年阳历和阴历（19被数年）能碰到一起或只差一天。

农历转换成公历的计算公式？因为公历（现在用的是格里历，以前还曾用儒列历）和中国农历都不是严格按一个公式计算得到的，所以两个历法没有直接的公式。

试图用一个简单的公式，而不利用许多像万年历一样的数据（尽管可以简化），就达到公农历转换的目的，这是不可能的。我们能见到的所有公农历转换的软件，都存有多少不等的一些年份的历法数据。

这些数据之中，最重要的是农历的每月天数。因为农历是阴阳历，阴历部分（按月相编的部分）决定月日，阳历部分（按太阳高度编的部分）就是节气。节气基本上是与公历直接对应的，可以较容易的推算；但月相周期与地球公转的关系相对复杂，一般都需要天文观测数据授时，所以农历每月是大月还是小月没有简单的公式。

至于公历和农历的置闰，倒都有一定的方式推算，并不困难。

如果只是天文数据，其实都还是可以算的――因为天文周期十分稳定，我们只要严格地按天文周期推算就可以了。可是还有更为麻烦的一点，就是公历和农历这些历法，并不是完全严格地按照天文上的实际周期进行的，还有许多人为的因素。最著名的就是罗马皇帝几次修改2、8等月份长短，以及儒列历中因计算不准确而人为地去掉了十天等事。中国农历也有因为古代天文观测不准确造成的***颁布的历法与天象不吻合的（我们不能苛求古人观测的精度）。所以这两部历法都是与一个时期社会有关的东西，也就没有一定的规律可循了。

阳历19740820转换阴历是多少(公历)：1974年8月20日

(农历)：甲寅年七月初三

求农历公历转换算法编程不太懂

传下来口诀

乘五除四九加日

双月间隔三十天。

一二自加整少一，

三五七八十尾前。

具体的算法你可网上找下资料百度上很多的我就不多累赘了的

阴历19970205换算成阳历是多少？3.13

excel如何农历转换阳历公式比如今天是2010年9月2日，用以下公式就可以得出农历七月二十四：

虽然在遇到闰月时，显示结果有点差强人意，如下图中，2010年2月9日的农历应是十二月二十六，但因为那年有个闰五月，就无辜多出来一个月了。不过总比编代码要快捷多了吧，而且闰月也不是天天有。

假如把公式改成：=MID(甲乙丙丁戊己庚辛壬癸,MOD(TEXT(A2,[$-130000]e)-4,10)+1,1)&MID(子丑寅卯辰巳午未申酉戌亥,MOD(TEXT(A2,[$-130000]e)-4,12)+1,1)&年&TEXT(A2,[$-130000][DBNum1]m月)&TEXT(A2,IF(--TEXT(A2,[$-130000]d)=10,初十,IF(--TEXT(A2,[$-130000]d)>10,[$-130000][DBNum1]d,初[$-130000][DBNum1]d)))，那就更像农历表示法了，不过因为农历每年开始日期都不一样，所以函数很难达到十分精确的结果，只能是将就着用。

在EXCEL中怎样把公历转换成农历DimWeekName(7),MonthAdd(11),NongliData(99),TianGan(9),DiZhi(11),ShuXiang(11),DayName(30),MonName(12)

DimcurTime,curYear,curMonth,curDay,curWeekday

DimGongliStr,WeekdayStr,NongliStr,NongliDayStr

Dimi,m,n,k,isEnd,bit,TheDate

PrivateSubForm_Load()

'获取当前系统时间

curTime=Now()

'星期名

WeekName(0)=*

WeekName(1)=星期日

WeekName(2)=星期一

WeekName(3)=星期二

WeekName(4)=星期三

WeekName(5)=星期四

WeekName(6)=星期五

WeekName(7)=星期六

'天干名称

TianGan(0)=甲

TianGan(1)=乙

TianGan(2)=丙

TianGan(3)=丁

TianGan(4)=戊

TianGan(5)=己

TianGan(6)=庚

TianGan(7)=辛

TianGan(8)=壬

TianGan(9)=癸

'地支名称

DiZhi(0)=子

DiZhi(1)=丑

DiZhi(2)=寅

DiZhi(3)=卯

DiZhi(4)=辰

DiZhi(5)=巳

DiZhi(6)=午

DiZhi(7)=未

DiZhi(8)=申

DiZhi(9)=酉

DiZhi(10)=戌

DiZhi(11)=亥

'属相名称

ShuXiang(0)=鼠

ShuXiang(1)=牛

ShuXiang(2)=虎

ShuXiang(3)=兔

ShuXiang(4)=龙

ShuXiang(5)=蛇

ShuXiang(6)=马

ShuXiang(7)=羊

ShuXiang(8)=猴

ShuXiang(9)=鸡

ShuXiang(10)=&q......>>