验证银行卡号是否输入正确

zhgfeng1988

干人资的兄弟姐妹们，尤其是薪资这块的，是否会担心输入卡号错误，那么下面将为大家提供一个数组公式为大家分忧艰难。公式如下：
=IF(MOD(SUMPRODUCT(IF(--LEFT(RIGHT(0&A1,ROW($1:$10)*2))*2>9,--LEFT(RIGHT(0&A1,ROW($1:$10)*2))*2-9,--LEFT(RIGHT(0&A1,ROW($1:$10)*2))*2))+SUMPRODUCT(--LEFT(RIGHT(0&A1,ROW($1:$10)*2-1))),10)=0,TRUE,FALSE)<如果各位有验证错误的，请提出。>
关于这个公式在“一剑惊心”，“首席打杂”，“ 13732120571”三位朋友的帮助下总结而成的，在这里感谢这三位朋友，谢谢你们的帮助，让我这位excelhome快速成 长。其次我觉得这个公式可以进一步的简化，这一点我做不到，欢迎大家前来讨论，简化得出更简单的公式。

sunya_0529

银行卡号的验证是基于什么前提呢？

每家银行的定义不一样，没有银行的账户数据，如何验证？

zhgfeng1988

是防止输入时手误的好吧！如果奇数位的和和输错奇数位时的和相等 本公式无法验证

zhgfeng1988

银行卡号的定义是一样的吧！都是luhn 算法吧？

云雾贡茶18

变换一下公式：@N(MOD(SUM(SUMPRODUCT(MID(RIGHT(REPT(0,4)&B2,20),ROW($1:$10)*2,1)+0),SUMPRODUCT(MOD(MID(RIGHT(REPT(0,4)&B2,20),ROW($1:$10)*2-1,1)*2,9)+0)),10)=0)

1. @N(MOD(SUM(SUMPRODUCT(MID(RIGHT(REPT(0,4)&B2,20),ROW($1:$10)*2,1)+0),SUMPRODUCT(MOD(MID(RIGHT(REPT(0,4)&B2,20),ROW($1:$10)*2-1,1)*2,9)+0)),10)=0)

复制代码

云雾贡茶18

@N(MOD(SUM(SUMPRODUCT(MID(RIGHT(REPT(0,4)&B2,20),ROW($1:$10)*2,1)+0),SUMPRODUCT(MOD(MID(RIGHT(REPT(0,4)&B2,20),ROW($1:$10)*2-1,1)*2,9)+0)),10)=0)

柒月_破晓

云雾贡茶18 发表于 2017-5-30 01:42
@N(MOD(SUM(SUMPRODUCT(MID(RIGHT(REPT(0,4)&B2,20),ROW($1:$10)*2,1)+0),SUMPRODUCT(MOD(MID(RIGHT(REPT(0 ...

乘积正好被9整除的就出错了，比如18，余数为0，实际应该是9

wb_1027

先收了，慢慢研究，也許有一天出納就能用到，能減少點失誤豈不是更好！