如何运用EXCEL测算日子的天干地支

发布日期:2025-02-04 03:47    点击次数:95

       如何运用EXCEL测算日子的天干地支  

要测算天干地支,最快的方法就是翻农历。这里通过excel我们主要学习怎么运用电子表格设计天干地支的测算方法,仅供学习参考。 

第一种方法:

      测算日子的天干地支有个公式,分别为:

 天干序号=4*c+[c/4]+5y+[y/4]+[3*(m+1)/5]+d-3      地支序号=8*c+[c/4]+5y+[y/4]+[3*(m+1)/5]+d+7+i      其中:c为年号前两位数

y为年号后两位数

m为月份

d为日子

i(奇数月i=0;偶数月i=6)

[ ]表示对[ ]内的数字取整数

将上面公式中的未知数用公式代替,则有:

c=IF(B2>=2000,20,19)  其中B2表示年份所在单元格

y=B2-IF(B2>=2000,20,19)*100

m=C2  其中C2表示月份所在单元格

d=D2  其中D2表示日子所有单元格

i=IF(MOD(C2,2),0,6)  其中C2表示月份所在单元格

则有:

天干序号:=MOD((4*IF(B2>=2000,20,19)+INT(IF(B2>=2000,20,19)/4)+5*(B2-IF(B2>=2000,20,19)*100)+INT((B2-IF(B2>=2000,20,19)*100)/4)+INT(3*(C2+1)/5+D2-3)),10)

地支序号:=MOD((8*IF(B2>=2000,20,19)+INT(IF(B2>=2000,20,19)/4)+5*(B2-IF(B2>=2000,20,19)*100)+INT((B2-IF(B2>=2000,20,19)*100)/4)+INT(3*(C2+1)/5)+D2+7+IF(MOD(C2,2),0,6)),12)

根据天干地支序号,查找天干地支:

天干=VLOOKUP(B3,A7:C25,2,FALSE)

地支=VLOOKUP(B4,A7:C25,3,FALSE)

其中B3、B4,为天干地支序号所在单元格,A7:C25表示天干地支所在表单和范围

通过上述设计,就可以任意输入年月日,测算出当天的天干地支了。

附图:

图片

第二种方法:

一、计算公式:{(公元年数-1)×5+(公元年数-1)÷4+当天是当年的第几日} ÷ 60

天干序数:将所得余数÷10,得出的余数

地支序数:将所得余数÷12,得出的余数

二、用excl公式表示:

天干地支:

=MID("甲乙丙丁戊己庚辛壬癸",IF(INT(MOD(MOD(((YEAR(C1)-1)*5+(YEAR(C1)-1)/4+DAYS(C1,B1)+1),60),10))=0,10,INT(MOD(MOD(((YEAR(C1)-1)*5+(YEAR(C1)-1)/4+DAYS(C1,B1)+1),60),10))),1)&MID("子丑寅卯辰巳午未申酉 戌亥",IF(INT(MOD(MOD(((YEAR(C1)-1)*5+(YEAR(C1)-1)/4+DAYS(C1,B1)+1),60),12))=0,12,INT(MOD(MOD(((YEAR(C1)-1)*5+(YEAR(C1)-1)/4+DAYS(C1,B1)+1),60),12))),1)

说明:C1是所求年月日所在的单元格,用日期格式表示;

       B1是当年1月1日所在单元格,用日期格式表示。

附图:

图片

特别说明:上述公式在复制粘帖过程中,代表单元格的字母会发生变化,导致公式错误,要注意纠正过来!

本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。

上一篇:没有了