如何使用PHPExcel在Excel中合并列

Question

我已经查看了这个使用PHPExcel合并Excel中的行和列，但它仅适用于行添加，我尝试了一些列相关的测试，但是无效。

虽然这段代码成功创建了Excel表格，但是在Excel中输出时会出现错误。

编辑

然而，如果删除循环并以简单方式放置，则可以正常工作 -

$objPHPExcel->setActiveSheetIndex(0)->mergeCells('A1:B1');
$objPHPExcel->getActiveSheet()->setCellValue('A1', 'Swapnesh');

添加数据的主要代码 -

// Add some data
echo date('H:i:s') , " Add some data" , EOL;
$i = "A";
$j ="B";
for($num =1; $num <= 5; $num++ )
{
    $concat =  "{$i}1:{$j}1";
    $objPHPExcel->setActiveSheetIndex(0)->mergeCells($concat);
    $i++;$j++;
} 
$objPHPExcel->getActiveSheet()->setCellValue('A1', 'Swapnesh');

我的整个代码 -

<?php
error_reporting(E_ALL);
ini_set('display_errors', TRUE);
ini_set('display_startup_errors', TRUE);

define('EOL',(PHP_SAPI == 'cli') ? PHP_EOL : '<br />');

date_default_timezone_set('Asia/Calcutta');

/** Include PHPExcel */
require_once 'Classes/PHPExcel.php';


// Create new PHPExcel object
echo date('H:i:s') , " Create new PHPExcel object" , EOL;
$objPHPExcel = new PHPExcel();

// Set document properties
echo date('H:i:s') , " Set document properties" , EOL;
$objPHPExcel->
getProperties()->setCreator("Swapnesh Sinha")
                             ->setLastModifiedBy("Swapnesh")
                             ->setTitle("Office 2007 XLSX Test Document")
                             ->setSubject("Office 2007 XLSX Test Document")
                             ->setDescription("Test document for Office 2007 XLSX, generated using PHP classes.")
                             ->setKeywords("office 2007 openxml php")
                             ->setCategory("Test result file");


// Add some data
echo date('H:i:s') , " Add some data" , EOL;
$i = "A";
$j ="B";
for($num =1; $num <= 5; $num++ )
{
    $concat =  "{$i}1:{$j}1";
    $objPHPExcel->setActiveSheetIndex(0)->mergeCells($concat);
    $i++;$j++;
} 
$objPHPExcel->getActiveSheet()->setCellValue('A1', 'Swapnesh');

// Rename worksheet
echo date('H:i:s') , " Rename worksheet" , EOL;
$objPHPExcel->getActiveSheet()->setTitle('Student Data');


// Set document security
echo date('H:i:s') , " Set document security" , EOL;
$objPHPExcel->getSecurity()->setLockWindows(true);
$objPHPExcel->getSecurity()->setLockStructure(true);
$objPHPExcel->getSecurity()->setWorkbookPassword("PHPExcel");


// Set sheet security
echo date('H:i:s') , " Set sheet security" , EOL;
$objPHPExcel->getActiveSheet()->getProtection()->setPassword('PHPExcel');
$objPHPExcel->getActiveSheet()->getProtection()->setSheet(true); // This should be enabled in order to enable any of the following!
$objPHPExcel->getActiveSheet()->getProtection()->setSort(true);
$objPHPExcel->getActiveSheet()->getProtection()->setInsertRows(true);
$objPHPExcel->getActiveSheet()->getProtection()->setFormatCells(true);


// Set active sheet index to the first sheet, so Excel opens this as the first sheet
$objPHPExcel->setActiveSheetIndex(0);


// Save Excel 2007 file
echo date('H:i:s') , " Write to Excel2007 format" , EOL;
$objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, 'Excel2007');
//$objWriter->save(str_replace('.php', '.xlsx', __FILE__));
$filename = "Student-data-sheet".".xlsx";
$objWriter->save($filename);
echo date('H:i:s') , " File written to " , str_replace('.php', '.xlsx', pathinfo(__FILE__, PATHINFO_BASENAME)) , EOL;


// Echo memory peak usage
echo date('H:i:s') , " Peak memory usage: " , (memory_get_peak_usage(true) / 1024 / 1024) , " MB" , EOL;

// Echo done
echo date('H:i:s') , " Done writing file" , EOL;
echo 'File has been created in ' , getcwd() , EOL; 

- swapnesh

Answer 1

我自己找到了解决方案——

实际上，在列合并的情况下，我们不需要进行迭代。假设我想从列A1合并到E1。

因此，我们可以很容易地通过以下方式完成，而无需逐个循环：

$objPHPExcel->setActiveSheetIndex(0)->mergeCells('A1:E1');

所以在我的情况下，我首先需要找到最后一个元素和第一个元素，然后简单地将它们放入mergeCells()方法中使其工作。

- swapnesh

Answer 2

当您试图在循环中合并两个单元格时，可能会出现此问题。原因不是您正在迭代的循环，而是您传递的列名。如果您传递错误的列名，则您的Excel将无法生成正确的输出。

以下是用于获取下一个Excel列的简单程序，以便我们不会遇到此类问题。

/* manage excel index */
function getColumn($prevColumn){
    if(strlen($prevColumn)==1&&$prevColumn!="Z")
    { $prevColumn++;return $prevColumn; }

    $colum = '';
    $list = str_split($prevColumn);

    if(count($list)==1&&$list[0]=='Z')
    {
        $list[0] = "A";
        $list[1] = "A";
    }
    else if(count($list)==2&&$list[1]!='Z')
    {
        $list[1]++;
}
    else if(count($list)==2&&$list[1]=='Z')
    {
        $list[0] = "B";
        $list[1] = "A";
}
return implode('',$list);
}

## us this like below

$column = "A";
$row = 1;
foreach($array_to_print as $details)
{

$column = getColumn($column); // product next column B
$Excelobj->getActiveSheet()->setCellValue($column.$row, $details);
$column = getColumn($column);// product next column C
$Excelobj->setActiveSheetIndex(0)->mergeCells($from_cell.':'.$to_cell);// now this will  work till A-ZZ column in excel
}

- Vishal Bhandare