玩玩闰年判断

lfspecter

1. =IF(COUNT(--(A4+400&"-2-29")),"这一年是闰年!","这一年是平年!")

复制代码

e表格学习

zhjlgaojuan 发表于 2016-6-22 15:21
不好意思,你这个公式错了....
=TEXT(N(OR(MOD(A4,400)=0,AND(MOD(A4,100)0,MOD(A4,4)=0)))-1,"[=0]这一 ...

又看了一次，您的公式好像有问题：有时返回值之前有“-”号。

zhjlgaojuan

e表格学习 发表于 2016-6-23 10:45
又看了一次，您的公式好像有问题：有时返回值之前有“-”号。

没考虑到负值的时候TEXT返回值前会自己加负号
=TEXT(N(OR(MOD(A4,400)=0,AND(MOD(A4,100)<>0,MOD(A4,4)=0))),"[=0]这一年是平年!！;这一年是润年!！")

e表格学习

pxiceplay 发表于 2016-6-22 15:40
如果不管excel的1900/2/29 bug，可以用
=TEXT(A4&"/2/29","闰年;;;平年")
如果要完全正确的历法就按3楼来 ...

谢谢！这个应该是最好的公式了，如果不考虑1900.
3楼公式有些小问题……

e表格学习

nccuiyehua 发表于 2016-6-22 15:43
=IF(MOD(DAY(DATE(A4,3,0)),2),"闰年","平年")

公式正确！但是绕不过1900年这个bug。

e表格学习

lfspecter 发表于 2016-6-22 16:07

谢谢lfspecter版主！

公式的根据是：“闰年的400年后还是闰年（数字），非闰年的400年后还是非闰年（文本）”。
这样就把基于：
“地球绕日运行周期即一个回归年是365天5小时48分46秒（合365.24219天），公历把一年定为365天，所以计算起来，每400年会多出97天，也就是说，要设置97个闰年。
而每4年设一个闰年，400年会有100个闰年，就多出3个闰年。为了解决这个问题，除了规定“能被4整除”这个条件外，还规定“凡是整百的年份，要能被400整除”的才算闰年”的公式简化、缩短了很多。妙！！

问题：式中“--”似乎可以省略？

lfspecter

e表格学习 发表于 2016-6-23 11:32
谢谢lfspecter版主！

公式的根据是：“闰年的400年后还是闰年（数字），非闰年的400年后还是非闰年（ ...

确实，“--”不影响结果。

e表格学习

lfspecter 发表于 2016-6-22 16:07

又琢磨了一下，好像公式有问题：公式会“漏判”一部分闰年？

e表格学习

lfspecter 发表于 2016-6-22 16:07

9599年~9999年，无法使用您的公式。

xpm130

e表格学习 发表于 2016-6-23 12:47
9599年~9999年，无法使用您的公式。

说不定到了那时，历法改变了，excel也修正了BUG