虚心求教_求教vba编程
问题补充:

最佳答案
一个公式解决全部的问题:
E4=CHOOSE((LEN($C$2)>LEN(SUBSTITUTE($C$2,MID($B4,(COLUMN(A1)-1)*2+1,1),"")))*3
;判定有无第一位数,如果有,赋予相应的权值;
+(LEN($C$2)>LEN(SUBSTITUTE($C$2,MID($B4,(COLUMN(A1)-1)*2+2,1),"")))*2
;判定有无第二位数,如果有,赋予相应的权值
+1,
;防止出现全部没有时为0的情况;
1,1,2,3,4,4)
;将计算结果替换为需要的值。
输入公式后右拉、下拉完成所有判定。
公式长度:160字符。目前最短。
无论首位是不是0,本公式都可以正确判定。
最佳答案由网友 傲乡 提供
其他回答
暂无其它回答!