PHP:数字转Excel列头

转自我的个人博客:阔野飞花 http://www.rexcao.net/archives/169

前段时间升级一个项目的Excel导出功能,这次的列数大概有60多条,在处理过程中发现一个问题,原先做好的数字转Excel列头功能现在只到 AZ列就结束了,那显然是不够用啊,后来再仔细查看,发现,原来AZ列之后的内容显示到AAA列上面了,然后看了看原来的代码才发现,原来的逻辑错了!

我原来的错误逻辑是这样的:A-Z,Z下来是AA,AA-AZ,AZ下来是AAA,下来是AAAA依次类推...但是Excel中AZ下来是BZ!意识到这一点之后,就着手开始修改自己原先的代码。

阶段一

数字转Excel列头,目标是提供任意一个数字,将其通过一个固定的方法转为Excel的列头,在此,我准备通过26位数作为临界值取整,取余来判断,后来发现有些绕,就干脆当作26进制来处理了。

阶段二

当 作26进制来处理之后,折腾了一会又发现一个新的问题,对于Excel列头来说,它的计算单位是A-Z,用十进制来类比,十进制数字的计算单位是 0-9,Excel列头Z的下一位是AA,而十进制9的下一位是10,如果A代表0的话,Excel列头Z就相当于是最大的十进制单位9,但是十进制的 10的上位是1,它代表尚未是有值的,而看看Excel列头AA的上位,是A,A代表0,那意思是上位没有值?显然不合理,所以我发现,这里也不能纯粹地 当作26进制来处理。

阶段三

经过上面两个阶段的折腾后,我决定采用另外一种办法,大体思路如下:

1、不再固定计算每个数字对应的列头字母,而是计算指定数字个列头(例如2个就是A、B,3个就是A、B、C等等)。

2、每次加1后,当前字母也加1(相当于1+1=2,A+1=B)。

3、计算结果是多个字母的拼接结果(A拼接A=AA,A拼接B=AB)。

4、低位加1的结果大于Z的话,向上位进一,进一之后的这个上位如果还大于Z的话,继续向上进一...(向上冒泡)

结果

既然思路已经清晰了,那么可以看看实现了。

header(‘Content-Type:text/html; charset=utf-8‘);
echo ‘Convert number to title of excel.<br>‘;

function showarr($arr){
    echo ‘<pre>‘;
    print_r($arr);
    echo ‘</pre><br>‘;
}

$ea = new ExcelAssistant();
$test1 = $ea->GetExcelTit(27);
showarr($test1);

/**
 * Excel助手
 * @author RexCao 2015-01-08
 */
class ExcelAssistant{
    private $carr = array();//结果数组,初始值为A
    private $curlet = ‘A‘;//当前末尾字母,初始化为A
    private $curletpi = 0;//当前字符串从右向左的位数,用来上位递归加1处理(从0开始)
    private $tmpar = array(‘A‘);//临时数组,存储结果字符串上每位的字符。初始值为‘A‘
    private static $a = array(‘A‘,‘B‘,‘C‘,‘D‘,‘E‘,‘F‘,‘G‘,‘H‘,‘I‘,‘J‘,‘K‘,‘L‘,‘M‘,‘N‘,‘O‘,‘P‘,‘Q‘,‘R‘,‘S‘,‘T‘,‘U‘,‘V‘,‘W‘,‘X‘,‘Y‘,‘Z‘);
    private static $b = array(‘A‘=>0,‘B‘=>1,‘C‘=>2,‘D‘=>3,‘E‘=>4,‘F‘=>5,‘G‘=>6,‘H‘=>7,‘I‘=>8,‘J‘=>9,‘K‘=>10,‘L‘=>11,‘M‘=>12,‘N‘=>13,‘O‘=>14,‘P‘=>15,‘Q‘=>16,‘R‘=>17,‘S‘=>18,‘T‘=>19,‘U‘=>20,‘V‘=>21,‘W‘=>22,‘X‘=>23,‘Y‘=>24,‘Z‘=>25);
    
    /**
     * 获取excel列头
     * @param $num 列数总计
     */
    public function GetExcelTit($num){
        $i = 0;
        while($i<$num){
            $this->curletpi = 0;//没有处理上位的时候,只处理当前位
            $this->tmpar[count($this->tmpar)-1] = $this->curlet;
            $this->carr[] = implode(‘‘,$this->tmpar);
            $this->curlet = $this->GetNextLetter($this->curlet);
            
            if($this->curlet == ‘A‘){
                //说明过了一圈,该向上位递归加1了
                $this->curletpi++;//从当前位左边的那位开始处理
                $this->RecursiveAddUp();
            }
            $i++;
        }
        return $this->carr;
    }

    /**
     * 根据字母获取下位字母
     * A-Z循环
     */
    public function GetNextLetter($l){
        $k = self::$b[$l];//当前字母索引
        $k++;//下位字母索引
        if($k == 26){
            $l = ‘A‘;//反转
        }else{
            $l = self::$a[$k];
        }
        return $l;
    }

    /**
     * 递归向上位加一
     * 在这里,只有一次计算结果为A后,才会向上加1,
     * 但不是每个位加了之后都要往上位冒泡,所以不能遍历每个位
     * @author RexCao
     */
    public function RecursiveAddUp(){
        //先更新最右位的字母
        $this->tmpar[count($this->tmpar)-1] = ‘A‘;
        if($this->curletpi+1>count($this->tmpar)){
            $this->tmpar = array_merge(array(‘A‘),$this->tmpar);
        }else{
            $cl = $this->tmpar[count($this->tmpar)-$this->curletpi-1];//当前位的字母
            $cl = $this->GetNextLetter($cl);
            if($cl == ‘A‘){
                $this->tmpar[count($this->tmpar)-$this->curletpi-1] = ‘A‘;//要去处理更上位了,先更新本位
                $this->curletpi++;//再上一位
                $this->RecursiveAddUp();
            }else{
                //更新当前位的字母为新字母即可
                $this->tmpar[count($this->tmpar)-$this->curletpi-1] = $cl;
            }
        }
    }
}

有兴趣看运行结果的,可以去我的个人博客瞧瞧咯(●‘?‘●)。阔野飞花 http://www.rexcao.net/archives/169

郑重声明:本站内容如果来自互联网及其他传播媒体,其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享,并不代表本站赞同其观点和对其真实性负责,也不构成任何其他建议。