标签:
转自我的个人博客:阔野飞花 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
标签:
原文地址:http://www.cnblogs.com/windwalking/p/4232222.html