传一个供你参考，是一个自定义函数，使用方法就跟使用Excel的普通函数一样。输入一个函数后，向下拖动复制公式即可。单函数的适用范围更广。
效果图如下：（附件里有代码，我用的是excel2010，另存了一个excel2003格式）
