农历转阳历

农历转阳历

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)))，那就更像农历表示法了，不过因为农历每年开始日期都不一样，所以函数很难达到十分精确的结果，只能是将就着用。农历转换成公历的计算公式？ 因为公历（现在用的是格里历，以前还曾用儒列历）和中国农历都不是严格按一个公式计算得到的，所以两个历法没有直接的公式。
试图用一个简单的公式，而不利用许多像万年历一样的数据（尽管可以简化），就达到公农历转换的目的，这是不可能的。我们能见到的所有公农历转换的软件，都存有多少不等的一些年份的历法数据。
这些数据之中，最重要的是农历的每月天数。因为农历是阴阳历，阴历部分（按月相编的部分）决定月日，阳历部分（按太阳高度编的部分）就是节气。节气基本上是与公历直接对应的，可以较容易的推算；但月相周期与地球公转的关系相对复杂，一般都需要天文观测数据授时，所以农历每月是大月还是小月没有简单的公式。
至于公历和农历的置闰，倒都有一定的方式推算，并不困难。
如果只是天文数据，其实都还是可以算的——因为天文周期十分稳定，我们只要严格地按天文周期推算就可以了。可是还有更为麻烦的一点，就是公历和农历这些历法，并不是完全严格地按照天文上的实际周期进行的，还有许多人为的因素。最著名的就是罗马皇帝几次修改2、8等月份长短，以及儒列历中因计算不准确而人为地去掉了十天等事。中国农历也有因为古代天文观测不准确造成的政府颁布的历法与天象不吻合的（我们不能苛求古人观测的精度）。所以这两部历法都是与一个时期社会有关的东西，也就没有一定的规律可循了。农历和阳历转换有什么规律啊? 没有。阳历是以地球围绕太阳公转一周的时间(即: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被数年）能碰到一起或只差一天。如何将农历转换为公历 是公历11月13日。这日历上有，要问怎么换的，当然公历是固定的，1、3、5、7、8、10、12月都是31天，2月28天（每4年润一次月，像2008年够4整除，润2月29天），其余的都是30天。
对于农历，它实质是阴历，沿用的是太阴历，这是一门很复杂的天文学知识。它包括24节气。
记住阳历是：1、3、5、7、8、10、腊，31天都不差，其余都是30天，除了2月28.
若是闰月2月29天，只多一天。Excel 中阳历日期如何转换成阴历日期？ 2007版的excel可用下面公式转换：
=TEXT(A1,[$-130000]yyyy年m月&IF(LEN(--TEXT(A1,[$-130000]dd))=1,初,)&d)在EXCEL中怎样把公历转换成农历 Dim WeekName(7), MonthAdd(11), NongliData(99), TianGan(9), DiZhi(11), ShuXiang(11), DayName(30), MonName(12)
Dim curTime, curYear, curMonth, curDay, curWeekday
Dim GongliStr, WeekdayStr, NongliStr, NongliDayStr
Dim i, m, n, k, isEnd, bit, TheDate
Private Sub Form_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......余下全文>>农历转换公历对照表 是公历1945年4月29日 星期日如何把农历转成阳历，求算法 int lunarInfo[]={
0x04bd8,0x04ae0,0x0a570,0x054d5,0x0d260,0x0d950,0x16554,0x056a0,0x09ad0,0x055d2,
0x04ae0,0x0a5b6,0x0a4d0,0x0d250,0x1d255,0x0b540,0x0d6a0,0x0ada2,0x095b0,0x14977,
0x04970,0x0a4b0,0x0b4b5,0x06a50,0x06d40,0x1ab54,0x02b60,0x09570,0x052f2,0x04970,
0x06566,0x0d4a0,0x0ea50,0x06e95,0x05ad0,0x02b60,0x186e3,0x092e0,0x1c8d7,0x0c950,
0x0d4a0,0x1d8a6,0x0b550,0x056a0,0x1a5b4,0x025d0,0x092d0,0x0d2b2,0x0a950,0x0b557,
0x06ca0,0x0b550,0x15355,0x04da0,0x0a5d0,0x14573,0x052d0,0x0a9a8,0x0e950,0x06aa0,
0x0aea6,0x0ab50,0x04b60,0x0aae4,0x0a570,0x05260,0x0f263,0x0d950,0x05b57,0x056a0,
0x096d0,0x04dd5,0x04ad0,0x0a4d0,0x0d4d4,0x0d250,0x0d558,0x0b540,0x0b5a0,0x195a6,
0x095b0,0x049b0,0x0a974,0x0a4b0,0x0b27a,0x06a50,0x06d40,0x0af46,0x0ab60,0x09570,
0x04af5,0x04970,0x064b0,0x074a3,0x0ea50,0x06b58,0x055c0,0x0ab60,0x096d5,0x092e0,
0x0c960,0x0d954,0x0d4a0,0x0da50,0x07552,0x056a0,0x0abb7,0x025d0,0x092d0,0x0cab5,
0x0a950,0x0b4a0,0x0baa4,0x0ad50,0x055d9,0x04ba0,0x0a5b0,0x15176,0x052b0,0x0a930,
0x07954,0x06aa0,0x0ad50,0x05b52,0x04b60,0x0a6e6,0x0a4e0,0x0d260,0x0ea65,0x0d530,
0x05aa0,0x076a3,0x096d0,0x04bd7,0x04ad0,0x0a4d0,0x1d0b6,0x0d250,0x0d520,0x0dd45,
0x0b5a0,0x056d0,0x055b2,0x049b0,0x0a577,0x0a4b0,0x0aa50,0x1b255,0x06d20,0x0ada0};
int solarMonth[]={31,28,31,30,31,30,31,31,30,31,30,31};
//---------------------------------------------------------------------------
int lYearDays(int y) {
int i, sum = 348;
for(i=0x8000; i>0x8; i>>=1) sum += (lunarInfo[y-190......余下全文>>公历农历转换 回历、公历、农历的换算
（128 × 365＋31）日÷ 128年＝ 365．2421875日/年
可见共置闰精度远高于现代的公历。
2．换算中一日误差之订正
《历法丛谈》以回历1387年为例，求算合公历之年月日。
解1：1387 × 0．970224＋621．5774＝1967．278088年
0．278088年 × 365．2422日＝101．569日公历累计日数为101．57日可视为4月11日或4月12日。究竟是哪一日，当依两历在公历4月11日或12日间所具有同一的星期序数以订正。
依回历岁首星期序数计算公式：
[（138－1）×131＋164] ÷30＝6057，余20
6057÷7＝865，余 2
故回历1387年元旦为星期2。（表）按公历自1583年元旦（星期六）至1967年4月11日，共历：
1967－1583＝384年，在这384年中依格列高利历四年一闰，百年不闰，四百年加一闰日的规则共历93个闰日，又1967年元旦后一日起至4月11日又需加 100日，则
（384 × 365＋93＋100＋6）÷ 7＝140359＋7＝2001，余 2余2即星期2，故回历1387年元旦在公历1967年4月11日。
因公历计算星期日数采用数据较多，计算时难免有所遗漏，现引人公历日期与星期推算表阿），供参考。
应用此表查找公元1967年4月11日星期序数步骤如下：
先在本表年份表前二位数字栏目中，查到19二字所在的位置；
再在年份表后二位数字栏目中查到67二字所在位置，自19二字处平行右移，67二字处垂直下移，二者在英文大写字母栏目中相交于字母G处；
再自月份表栏目中查到4月，自4月所在位置平行左移，查到G在4月栏目所在位置；
自日期栏目查到11日所在位置，自此位置平行右移，使与4月份栏目G在星期表相交处知为星期二，结果与回历计算所得相同。故知回历 1387年元旦确为公历1967年4月11日，而不是12日。
在换算中所得公历日数常多于31日，甚至常在200—300日或更多，需要将此数化为该年的月日时，可用下列两表。
表3 公历月份及其累计日数三 公历换算为回历
将回历换算为公历的算式移项，整理，即可得到公历换算为国历的算式
（公历纪年一621．5691）÷0．9702＝回历年月日（儒略历）……………………………………………（5）
（公历纪年一621．5774）÷0．970224＝回历年月日（格氏历）…………………………………………（6）
无论回历换算为公历或相反，大体都有一日之差，以星期序数订正时，回历换算为公历，以回历的星期序数为准；相反，以公历的星期序数为准。
四 国历或公历换算为中国农历
1．回历换算为农历
仅管中国农历各年在年内月数日数都不是一个相对的稳定值，给回历与公历换算为农历上带来较多的困难，但仍然可以换算。中国农历为阴阳合历，在月份上与回历同属太阴历，惟回历每月以见新月为一月之始，其日约迟于农历合朔（初一日）1—2日乃至3日，因此只要查清二者在月份上关系，便可将回历换算为中国农历。马以愚先生称：“......余下全文>>农历阳历转换19901222 公历公元1991年2月6日 星期三
农历一九九零年 十二月(大)廿二
干支辛未年 庚寅月 丁未日
八字辛未 庚寅 丁未 庚子
五行路旁土 松柏木 天河水 璧上土
生肖属羊
星座水瓶座