PHP的Excel文件操作

function exportJibinExcel($arr, $fileName){
import('PHPExcel'); //导入PHPExcel.php文件
ini_set('memory_limit', '1000M');   //数据大的话，很号内存
$objPHPExcel = new PHPExcel();
$objPHPExcel->getProperties()->setCreator('lyl')
->setLastModifiedBy('lyl')
->setTitle('lyl');

//激活第一个选项， 然后填充数据
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('A1', '疾病编号');   //A1表示第一行A列
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('B1', '疾病名称');   //将内容写入单元格
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('C1', '科室编号');
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('D1', '科室名称');
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('E1', '必备');
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('F1', '标题');
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('G1', 'URL');

$i = 2;
foreach ($arr as $key => $val) {
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('A'.($i), $val['jb_id']);
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('B'.($i), $val['jb_name']);
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('C'.($i), $val['ks_id']);
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('D'.($i), $val['ks_name']);
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('E'.($i), $val['bb_name']);
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('F'.($i), $val['title']);
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('G'.($i), $val['url']);
$i++;
}

//设置单元格宽度
$objPHPExcel->getActiveSheet()->getColumnDimension('A')->setWidth(10);  //设置 列宽
$objPHPExcel->getActiveSheet()->getColumnDimension('B')->setWidth(10);
$objPHPExcel->getActiveSheet()->getColumnDimension('C')->setWidth(10);
$objPHPExcel->getActiveSheet()->getColumnDimension('D')->setWidth(10);
$objPHPExcel->getActiveSheet()->getColumnDimension('E')->setWidth(10);
$objPHPExcel->getActiveSheet()->getColumnDimension('F')->setWidth(50);
$objPHPExcel->getActiveSheet()->getColumnDimension('G')->setWidth(50);

//写操作
$objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, 'Excel2007');   //呃，还有个PHPExcel文件夹，应该也能下到的
$filePath = ATTACHEMENT_PATH . 'temp/excel/';   //设置 下载路径，没有判断路径是否存在，如果不存在会出错的
$fileName = $fileName.date('YmdHis').'.xlsx';
//         $reFileName = '3.xlsx';  //下面用到，excel文件名，好像优先于$filename?
$objWriter->save($filePath.$fileName);  //保存excel到路径
if (file_exists($filePath.$fileName)) {
getDownLoadFile($filePath, $fileName, $reFileName); //项目框架里的函数，下载文件，下次介绍
return true;
}else{
return false;
}
}