Question

EXCEL根据条件判断几个单元格的数值所代表的属性，望大神支招，跪谢！

EXCEL根据条件判断几个单元格的数值所代表的属性，条件如下：豹子就是A2、B2、C2三个单元格数字都相同。如：222、666、888...顺子就是A2、B2、C2三个单元格数字都相连，不分顺序（数字9、0、1相连）。如：123、901、321、798...对子就是A2、B2、C2三个单元格数字任意两位数字相同（不包括豹子）。如：001，288、696...半顺就是A2、B2、C2三个单元格数字任意两位数字相连，不分顺序（不包括顺子、对子）。如：125、540、390、160...杂六就是A2、B2、C2三个单元格数字不包括豹子、对子、顺子、半顺的所有号码。牛牛就是五个号码里三个号码的总和为10的倍数，另外两个号码的总和也为10的倍数，如： 1，1，7，3，8（1+1+8=10，3+7=10就是牛牛）牛1~牛9就是五个号码里三个号码的总和为10的倍数，另外两个号码的总和除以10余几为牛几，如： 1 ，2 ，7 ，4 ，5为牛9。（1+2+7=10，4+5=9就是牛9）5，8，5，1，7为牛六（8+7+5=20，5+1=6，就是牛六。）无牛就是任意三个号码的总和都不为10的倍数，如为：1，2，6，9，8为无牛。

望大神支招，纯学术研究！只是想知道用EXCEL如何去实现这种功能。

Answer 1

D2=IF(LARGE(A2:C2,1)=SMALL(A2:C2,1),"豹子",IF(OR(LARGE(A2:C2,1)=LARGE(A2:C2,2),SMALL(A2:C2,1)=SMALL(A2:C2,2)),"对子",IF(LARGE(A2:C2,1)-AVERAGE(A2:C2)=1,"顺子",IF(OR(LARGE(A2:C2,1)-LARGE(A2:C2,2)=1,SMALL(A2:C2,2)-SMALL(A2:C2,1)=1),"半顺","杂六"))))

追问

9，0，1是顺子哦，不是半顺。

追答

=IF(LARGE(A2:C2,1)=SMALL(A2:C2,1),"豹子",IF(OR(LARGE(A2:C2,1)=LARGE(A2:C2,2),SMALL(A2:C2,1)=SMALL(A2:C2,2)),"对子",IF(OR(LARGE(A2:C2,1)-AVERAGE(A2:C2)=1,AND(LARGE(A2:C2,1)=9,LARGE(A2:C2,2)=1,SMALL(A2:C2,1)=0)),"顺子",IF(OR(LARGE(A2:C2,1)-LARGE(A2:C2,2)=1,SMALL(A2:C2,2)-SMALL(A2:C2,1)=1),"半顺","杂六"))))
所有数是0~9吧

追问

对，所有数是0~9。还有那个牛牛的怎么弄呢？

追答

牛牛那个比较困难，还没想出来

追问

辛苦了，麻烦想一下呗，谢谢啦。。我把悬赏提高了

追答

H2=IF(SUM(IF(ISERROR(MATCH(10-A2:E2,A2:E2,0)),0,1))>0,IF(MOD(SUM(A2:E2),10)=0,"牛牛"))
ctrl+shift+enter结束输入
此公式只能判断是否是"牛牛"

追问

这样还不够，，

追答

可以考虑把所有可能的三个数相加为10的倍数的组合列个辅助表，再去匹配，列出来也就没几组的。

否则用公式好像没法做的
前面那个公式，半顺的没考虑0，9的可能性，修正一下
=IF(LARGE(A2:C2,1)=SMALL(A2:C2,1),"豹子",IF(OR(LARGE(A2:C2,1)=LARGE(A2:C2,2),SMALL(A2:C2,1)=SMALL(A2:C2,2)),"对子",IF(OR(LARGE(A2:C2,1)-AVERAGE(A2:C2)=1,AND(LARGE(A2:C2,1)=9,LARGE(A2:C2,2)=1,SMALL(A2:C2,1)=0)),"顺子",IF(OR(LARGE(A2:C2,1)-LARGE(A2:C2,2)=1,SMALL(A2:C2,2)-SMALL(A2:C2,1)=1,AND(LARGE(A2:C2,1)=9,SMALL(A2:C2,1)=0)),"半顺","杂六"))))

Answer 2

挺简单的，就是判断条件有点多而已，下午有点事，如果回来没人给你写，我就写个吧

追问

下午回来如果没事就写一个好吗？写一个牛牛的判断，好吗？谢谢啦

追答

901也算顺子？
那905岂不是要算半顺了？

追问

是的，905是半顺。前面一部分已经被解决了，就是牛牛这部分没人解决，如果谁解决了我就用谁的答案，我把悬赏提高了。。

追答

你判断牛牛的时候，51805为什么无牛？

追问

算错了呗。。。从小数学差，。

追答

vba写的，打开之后请允许宏运行，代码自己看，写的仓促，代码逻辑没精炼！

Answer 3

逻辑比较复杂，还是用vba吧

追问

也可以，要怎么做呢？