阳历转阴历查询（农历转阳历查询器）

请问知道阳历怎么计算阴历？

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

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

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

（注:式中Q、R、n均为自然数，R4）

例：1994年5月7日的阴历日期为：

1994－1977＝17＝4×4＋1

故：Q＝4，R＝1 则：5月7日的阴历日期为：

14×4+10.6(1+1)+(31+28+31+31+7)-29.5n

=204.2- 29.5n

然后用29.5去除204.2得商数6......27.2，6即是n值，余数27即是阴历二十七日。

阴历和阳历怎么换算

阴历阳历转换：

阴历阳历转换比较复杂，一般阴历日期大概落后阳历日期一个月，如果要转换可以借助万年历来查询。而且国际通用的历法是以一个太阳回归年为周期，谓之太阳历，简称为阳历，全球公用，故亦称为公历，阳历即是公历。

另外，中国传统的历法自夏朝始，称为夏历，是以月球绕地球一周为一月，十二月为一年，月亮号为太阴，故谓之太阴历，简称为阴历。由于阴历的一年只有354天，少于太阳回归年的365天，所以夏历采用置闰月的方法，使得阴历的年份与阳历的年份大概保持一致。所以夏历将太阴历配合了闰年及二十四节气，使得太阴历的年周期同步于太阳历。中国夏历其实是阴阳合历。

阴历和阳历生日转换器，阳历生日转换阴历生日

提起阴历和阳历生日转换器，大家都知道，有人问必须历转换成阳历,找这么一量转换的工具，另外，还有人想问阴历与阳历的生日转换，你知道这是怎么回事？其实农历新历转换器，下面就一起来看看阳历生日转换阴历生日，希望能够帮助到大家！

阴历和阳历生日转换器

阳历生日是年7月9日星期日，转成阴历是年六月十二，生肖属猪，距离今日已经过去天。

阴历甲午()年六月十二，距离今日还有天。（阳历是年7月8日星期二）查生日阴历阳历对照表。

阳历生日转换阴历生日？如何查询自己的阴历生日。

生日　如何农历转换公历？

出生是年6月23日出生日期查询农历生日。

如果这时间您给的是阳历，那么阴历你就是5月23日是生日。以后无论那一年的阴历5月23日都是你的生日。

有了阴历生日，变换的就是阳历得日子。每一年的日历牌您都可以查出对应的历日子。

以92年6月23日为阴历日子计算，年您的阳历生日是7月25日。以此类推。祝开心，生日快乐！

阴历和阳历生日转换器：必须历转换成阳历,找这么一量转换的工具

单独查询的话，万年历就行。万年历农历公历转换。

找个阳历日期转换为阴历日期程序，加一个循环，我一段程序就行了

找不到高手？让文员查他几个小时就行了

如何在EXCEL中实现生日阳历到阴历的批量转换。

OptionExplicit

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

Dimyear,month,day,grid,grid_date

Subdatetest()’这是转换样例农历生日计算器。

Debug.Printcalendar(“-8-15”)

EndSub生日查询系统。

Functioncalendar(grid)’转换函数1800～2100年公历农历对照表。

grid_date=grid星座查询农历转换阳历。

year=Mid(grid_date,1,4)阴历四月三十是阳历几月几号。

month=Mid(grid_date,6,1)阳历6月26生日农历是几号。

day=Mid(grid_date,8,2)今天是农历几月几日几号。

‘星期名

WeekName(0)=””

WeekName(1)=”星期日”公历如何换算成农历。

WeekName(2)=”星期一”

WeekName(3)=”星期二”农历3月20生日阳历是多少。

WeekName(4)=”星期三”

WeekName(5)=”星期四”时辰阳历公历不分吗。

WeekName(6)=”星期五”

WeekName(7)=”星期六”

‘天干名称

TianGan(0)=”甲”有没有1900以前的万年历。

TianGan(1)=”乙”

TianGan(2)=”丙”

TianGan(3)=”丁”

TianGan(4)=”戊”

TianGan(5)=”己”生日日期计算器。

TianGan(6)=”庚”阴历阳历公式。

TianGan(7)=”辛”

TianGan(8)=”壬”

TianGan(9)=”癸”农历和新历生日怎么算。

‘地支名称阳历1971年10月28日。

DiZhi(0)=”子”

DiZhi(1)=”丑”农历1999年7月14日生日新历是。

DiZhi(2)=”寅”

DiZhi(3)=”卯”上的生日在日历上怎么看。

DiZhi(4)=”辰”

DiZhi(5)=”巳”

DiZhi(6)=”午”1月18号阳历生日。

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)=”狗”

ShuXiang(11)=”猪”

‘农历日期名

DayName(0)=””

DayName(1)=”初一”

DayName(2)=”初二”

DayName(3)=”初三”

DayName(4)=”初四”

DayName(5)=”初五”

DayName(6)=”初六”

DayName(7)=”初七”

DayName(8)=”初八”

DayName(9)=”初8221;

DayName(10)=”初8221;

DayName(11)=”十一”

DayName(12)=”十二”

DayName(13)=”十三”

DayName(14)=”十四”

DayName(15)=”十五”

DayName(16)=”十六”

DayName(17)=”十七”

DayName(18)=”十八”

DayName(19)=”十8221;

DayName(20)=”二8221;

DayName(21)=”二十一”

DayName(22)=”二十二”

DayName(23)=”二十三”

DayName(24)=”二十四”

DayName(25)=”二十五”

DayName(26)=”二十六”

DayName(27)=”二十七”

DayName(28)=”二十八”

DayName(29)=”二十8221;

DayName(30)=”三8221;

‘农历月份名

MonName(0)=””

MonName(1)=”正”

MonName(2)=”二”

MonName(3)=”三”

MonName(4)=”四”

MonName(5)=”五”

MonName(6)=”六”

MonName(7)=”七”

MonName(8)=”八”

MonName(9)=”8221;

MonName(10)=”8221;

MonName(11)=”十一”

MonName(12)=”腊”

‘公历每月前面的天数

MonthAdd(0)=0

MonthAdd(1)=31

MonthAdd(2)=59

MonthAdd(3)=90

MonthAdd(4)=

MonthAdd(5)=

农历新历转换器

MonthAdd(6)=

MonthAdd(7)=

MonthAdd(8)=

MonthAdd(9)=

MonthAdd(10)=

MonthAdd(11)=

‘农历数据

NongliData(0)=

NongliData(1)=

NongliData(2)=

NongliData(3)=

NongliData(4)=

NongliData(5)=

NongliData(6)=

NongliData(7)=

NongliData(8)=

NongliData(9)=

NongliData(10)=

NongliData(11)=

NongliData(12)=

NongliData(13)=

NongliData(14)=

NongliData(15)=

NongliData(16)=

NongliData(17)=

NongliData(18)=

NongliData(19)=

NongliData(20)=

NongliData(21)=

NongliData(22)=

NongliData(23)=

NongliData(24)=

NongliData(25)=

NongliData(26)=

NongliData(27)=

NongliData(28)=

NongliData(29)=

NongliData(30)=

NongliData(31)=

NongliData(32)=

NongliData(33)=

NongliData(34)=

NongliData(35)=

NongliData(36)=

NongliData(37)=

NongliData(38)=

NongliData(39)=

NongliData(40)=

NongliData(41)=

NongliData(42)=

NongliData(43)=

NongliData(44)=

NongliData(45)=

NongliData(46)=

NongliData(47)=46

NongliData(48)=

NongliData(49)=

NongliData(50)=

NongliData(51)=

NongliData(52)=

NongliData(53)=

NongliData(54)=

NongliData(55)=

NongliData(56)=

NongliData(57)=

NongliData(58)=

NongliData(59)=

NongliData(60)=

NongliData(61)=

NongliData(62)=

NongliData(63)=

NongliData(64)=

NongliData(65)=

NongliData(66)=

NongliData(67)=

NongliData(68)=

NongliData(69)=

NongliData(70)=

NongliData(71)=

NongliData(72)=

NongliData(73)=

NongliData(74)=

NongliData(75)=

NongliData(76)=

NongliData(77)=

NongliData(78)=

NongliData(79)=

NongliData(80)=

NongliData(81)=

NongliData(82)=

NongliData(83)=

NongliData(84)=

NongliData(85)=

NongliData(86)=

NongliData(87)=

NongliData(88)=

NongliData(89)=

NongliData(90)=

NongliData(91)=

NongliData(92)=

NongliData(93)=

NongliData(94)=

NongliData(95)=

NongliData(96)=

NongliData(97)=

NongliData(98)=

NongliData(99)=

‘生成当前公历年、月、日==GongliStr

curYear=year

curMonth=month

curDay=day

GongliStr=curYear”年”

If(curMonth10)Then

GongliStr=GongliStr”0″curMonth”月”

Else

GongliStr=GongliStrcurMonth”月”

EndIf

If(curDay10)Then

GongliStr=GongliStr”0″curDay”日”

Else

GongliStr=GongliStrcurDay”日”

EndIf

‘生成当前公历星期==WeekdayStr

curWeekday=Weekday(curTime)

WeekdayStr=WeekName(curWeekday)

‘计算到初始时间年2月8日的天数：-2-8(正月初一)

TheDate=(curYear-)+Int((curYear-)/4)+curDay+MonthAdd(curMonth-1)-38

If((curYearMod4)=0AndcurMonth3)Then

TheDate=TheDate+1

EndIf

‘计算农历天干、地支、月、日

isEnd=0

m=0If(NongliData(m))Then

k=11

Else

k=12

EndIf

n=kIf(n0)Then

ExitDo

EndIf

‘获取NongliData(m)的第n个二进制位的值

bit=NongliData(m)

Fori=1TonStep1

bit=Int(bit/2)

Next

bit=bitMod2

If(TheDate=29+bit)Then

isEnd=1

ExitDo

EndIf

TheDate=TheDate-29-bit

n=n-1

Loop

If(isEnd=1)Then

ExitDo

EndIf

m=m+1

Loop

curYear=+m

curMonth=k-n+1

curDay=TheDate

If(k=12)Then

If(curMonth=(Int(NongliData(m)/)+1))Then

curMonth=1-curMonth

ElseIf(curMonth(Int(NongliData(m)/)+1))Then

curMonth=curMonth-1

EndIf

EndIf

‘生成农历天干、地支、属相==NongliStr

NongliStr=”农历”TianGan(((curYear-4)))DiZhi(((curYear-4)))”年”

NongliStr=NongliStr”(“ShuXiang(((curYear-4)))””

‘生成农历月、日==NongliDayStr

If(curMonth1)Then

NongliDayStr=”闰”MonName(-1curMonth)

Else

NongliDayStr=MonName(curMonth)

EndIf

NongliDayStr=NongliDayStr”月”

NongliDayStr=NongliDayStrDayName(curDay)

calendar=NongliStrNongliDayStr”)”

EndFunction

以上就是与阳历生日转换阴历生日相关内容，是关于必须历转换成阳历,找这么一量转换的工具的分享。看完阴历和阳历生日转换器后，希望这对大家有所帮助！

万年历农历转阳历查询表，万年历阴历转阳历表

提起万年历农历转阳历查询表，大家都知道，有人问万年历阴历转阳历表，另外，还有人想问万年历 1958年4月13阴历转换阳历是多少，你知道这是怎么回事？其实谁有万年历，帮我把农历转阳历，下面就一起来看看万年历阴历转阳历表，希望能够帮助到大家！

万年历农历转阳历查询表

1、万年历阴历转阳历表

阴历.5.15.是阳历.6.27.星期二阴历阳历转换查询表。

2、万年历年4月13阴历转换阳历是多少

阳历(公历)年4月13日=农历戊戌年乙卯月庚申日万年历阳历转换。

在输入万年历就能查看了。

3、谁有万年历，帮我把农历转阳历

双鱼座：Pisces阳历2月19日–3月20日

4、查万年历年农历8月25转换成阳历

阳历年10月9日星期四

谁有万年历，帮我把农历转阳历

农历八月廿五丁亥年[猪年]庚戌月辛酉日历转换万年历。

5、万年历阳历查询阴历哪儿有

提供中国古代择吉万年历查询,可对照查询公历、农历，新历、阴历，同时还提供每日干支、吉凶、宜忌、五行等信息

万年历查询

日,一,二,三,四,五,六年↑年↓月↑月↓**阳历中红色/绿色表示节假日，农历中绿色表示为24节气日，红色表示为传统节日，蓝色则表示为公众节假日

万年历查询表-万年历阳历查询阴历公历转农历生日查询表。

万年历（gregoriansolarcalendarandchineselunarcalendar)我国古代历法传说中最古老的一部太阳历。万年历阳历查询阴历为纪念古代历法编撰者万年功绩，便将这部历法命名为“万年历”。

万年历阳历查询阴历-八度搜索万年历查询阴历和阳历。

综合Google和,搜索“万年历阳历查询阴历”。设为万年历阳历查询阴历的聚搜结果，已去除%重复后的优化结果约条（用时秒）。以下是第1-10条：

万年历阳历查询阴历日历转换器公历转农历s4。

农历公历生日转换器。

6、新历农历对照表 7、万年历阴历转阳历查询阴历年8月24日阳历是几月几日。

阴历：八月廿四壬戌月[猴年]农历八月廿四日辛酉月天秤座，万年历农历公历对照表。

8、万年历农历查询年11月27日阳历是多少号

答：农历历。

[**是农历几月几日查询].

农历(阴历)转公历(阳历)：.10,1

查看原帖

9、万年历阴历转阳历

公元一九六六年·岁次·丙午·太岁·姓文名折·生肖·马·5月23号。[星期一]万年历查阴历阳历。

供你参考。

10、农历转公历查询

阳历12月5日。

11、年农历转阳历查询正月二十二阳历几月几日

阳历年3月7日星期六历对照的万年历。

农历正月廿二癸巳年[蛇年]乙卯月丁巳日

年农历正月二十二阳历年3月7日星期六

以上就是与万年历阴历转阳历表相关内容，是关于万年历阴历转阳历表的分享。看完万年历农历转阳历查询表后，希望这对大家有所帮助！

本文链接：http://www.changca.cn/xingzuodaquan/38933.html

转载：感谢您对网站平台的认可，以及对我们文章内容的青睐，非常欢迎各位朋友分享到个人站长或者朋友圈，但转载请说明文章出处。