如何在Excel中转换阴历阳历

如题所述

1.比如今天是2010年9月2日,用以下公式就可以得出农历七月二十四:

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

3.假如把公式改成:=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"))),那就更像农历表示法了,不过因为农历每年开始日期都不一样,所以函数很难达到十分精确的结果,只能是将就着用。

  那就更像农历的表示法了。

温馨提示:答案为网友推荐,仅供参考
第1个回答  2007-01-14
可以啊,不过比较复杂。参看excelhome论坛:
http://club.excelhome.net/dispbbs.asp?BoardID=3&ID=26011&replyID=&skin=0
下载里面的Excel附件。
可能需要注册一下。本回答被提问者采纳
第2个回答  2007-01-14
不会吧