公曆農曆轉換器下載?
Excel 怎樣用純函式公式計算公曆農曆轉換
公曆農曆轉換太複雜了,在Excel 用純函式公式計算是做不到的。
求農曆公曆轉換演算法
程式設計不太懂
傳下來 口訣
乘五除四九加日
雙月間隔三十天。
一二自加整少一,
三五七八十尾前。
具體的演算法你可網上找下資料 百度上很多的 我就不多累贅了的
在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......餘下全文>>
如何在Excel中轉換陰曆陽曆
可以啊,不過比較複雜。參看excelhome論壇:
http://club.excelhome.net/dispbbs.asp?BoardID=3&ID=26011&replyID=&skin=0
下載裡面的Excel附件。
可能需要註冊一下。
農曆新曆怎樣換算
國曆換算為公曆
1.換算公式的匯出
公曆每年365.242 199074075 日 (簡化為365.2422日),而回歷每年為354.367074375日(簡化為354.36707日),所以回曆一年只相當354.36707/365.2422=0.970223或0.970224個公曆年。又回曆元年元旦定在公元622年7月16日,由於當時曆法在推算上的誤差,致當時的7月16日,按現代的公曆應改為7月19日,自公元某年元旦至該年7月19日已達200日.相200/365.2422=0.5476公曆年;又因到回曆二年元旦才達到0.970224個公曆年,故自回曆紀年元旦換算為公曆的算式即為:
(回曆紀年一1)× 0.970224+622.5476年
=所求公曆年月日……………………………………………………………………………(1)
或 回曆紀年 × 0.970224+621.5774年
=所求公曆年月日……………………………………………………………………………(2)
式中621.5774來自622.5476-0.970224。
如所求某一歷史事實不在回曆元旦時,可將事實經過本年的總日數化為回曆年,加人回曆紀年總數中即可。
然而上列公曆一年的總日數,實際上是一回歸年的實測數,因現用公曆每年的日數實為365.2425日,它與一回歸年的日數只能是基本相符,到公元四千多年後會再出現一日之差。
實際上在明萬曆十年九月十八日,回曆990年9月16日,公元1582年10月4日前(包括4日)的公曆稱儒略曆,儒略曆每年365.25日,它每年與一回歸年的差值遠大於格列高利曆即現代的公曆,大約歷128年就需多閏去一日,至萬曆十年已經多閏出十日了。因此,對於儒略曆時期的回、公兩歷換算,不能仍採用(l)、(2)兩式,而需依儒略曆的年實際日數將上列二式略加修正即可,結果如下:
(回曆紀年一l)× 0.9702+622.5393
= 所求公曆年月日……………………………………………………………………………(3)
回曆紀年 × 0.9702+621.5691
= 所求公曆年月日…………………………………………………………………………(4)
式中0.9702為354.36707/365.25所得結果,而0.5393則系公曆某年元旦至其7月16日的總日數197被365.25日除之所得,622.5393-0.9702= 621.5691。
現將兩種算式自回曆第52年起,每隔百年所算得的公曆年月日列人下表:
國曆換算為公曆
自表列計算結果得知,曆法不同不能用同一算式,否則誤差大大。萬曆十年前即已發現儒略曆的春分所在日期與實測結果相差較大,至萬曆十年已差十日,因此格列高利第十三就決心修改儒略曆,改革內容有兩點,其一,將公曆1582年10月4日之後一日原應為10月5日而改為10月15日,而星期序數不變,即該年10月4日為星期四,10月15日理應為星期一,實為星期五;其二,儒略曆每四年有一個閏年,四百年有百閏,格列高利曆仍保持儒歷四年一閏的傳統,但每四百年僅安排九十七個閏年,四百年中逢百年不閏,到第四百年加一個閏年[6]。儒歷與格歷的歲實分別為:
儒歷(365 ×300+366 ×00)÷ 400年=365.25日/年
格歷(365 × 303+366×97)÷ 400年=365.2425日/年而《明史·歷志》所載的回回宮分歷(太陽曆),一百二十八年閏三十一......餘下全文>>
公曆如何轉換成農曆
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) = "猴"......餘下全文>>
想知道農曆生日如何轉換成公曆生日?
85年農曆9月2日生日公曆是85年10月15日,星座是天秤座(9月23日—10月22日)公曆85年9月2日,農曆是85年7月18日,星座是處女座(8月23日—9月22日)
星座是按照公曆來計算的
用js程式碼如何將公曆轉化為農曆
這也能轉嗎,好像用JS轉不了啊,如果哪個能轉我也想要要!~~!~!~