php批量替換Excel文件內(nèi)容

Sunxb 發(fā)布于2019-06-27 16:48 / 2036人閱讀

摘要：接口來實(shí)現(xiàn)批量替換不能打開應(yīng)用程序打開當(dāng)前目錄排除排除循環(huán)讀取文件生成源文件名已跳過，文件格式不對正在替換文件打開失敗，跳過文件不存在獲取到值判斷后在這里進(jìn)行替換黑體保存成功關(guān)閉工作簿全部

COM接口來實(shí)現(xiàn)php批量替換Excl

    $excelPath = "e:excel";
$total = $success = $jump = 0;
$objExcel = new COM("excel.application") or die("不能打開Excel應(yīng)用程序");
$handle = opendir($excelPath); //打開當(dāng)前目錄
readdir($handle); //排除"."
readdir($handle); //排除 ".."
//循環(huán)讀取文件
while ($file = readdir($handle)) {
    $total++;
    //生成源文件名
    $fileName = $excelPath . DIRECTORY_SEPARATOR .$file;
    $pathinfo = pathinfo($fileName);
    if(strtolower($pathinfo["extension"]) != "xls"){
        echo "已跳過：".$file."，文件格式不對";
        $jump++;
        continue;
    }
    echo "正在替換文件：".$file."
";
    if(file_exists($fileName)){
        if(!$objExcel->Application->WorkBooks->Open($fileName)){
            echo $file."打開失敗，跳過！";
            $jump++;
            continue;
        }
    }
    else{
        echo $fileName."文件不存在
";
        $jump++;
        continue;
    }
    $totalRow = $objExcel->ActiveSheet->UsedRange->Rows->Count;
    for($i=1;$i<=$totalRow;$i++){
        $keyword = trim($objExcel->Worksheets(1)->Range("A".$i)->Value);//獲取到值
        if(in_array($keyword,$replaceIn)){//判斷后在這里進(jìn)行替換
            $objExcel->Worksheets(1)->Range("B".$i)->Value = $replaceRule[$keyword];
            $objExcel->Worksheets(1)->Range("B".$i)->Font->Name = "黑體";
            $objExcel->Worksheets(1)->Range("B".$i)->Font->Size = 12;
        }
    }
    if(!$objExcel->ActiveWorkBook->Saved)
    {
        $objExcel->ActiveWorkBook->save();
        echo $file."保存成功！
";
        $success++;
    }
    //關(guān)閉工作簿
    $objExcel->Quit();
}
echo "
全部替換完成！共{$total}個(gè)，成功{$success}個(gè)，跳過{$jump}個(gè)！
";
//清空對象
$objExcel = null;
exit;

需要注意的是，盡量把這個(gè)程序放在命令行下跑，別放在IIS或APACHE下面，因?yàn)槭钦{(diào)用的系統(tǒng)組件COM，所以可能會出現(xiàn)各種奇葩的錯(cuò)誤，這些錯(cuò)誤的原因都是因?yàn)闄?quán)限不足引起的，所以直接用管理員身份運(yùn)行命令行，在命令行下跑就能把權(quán)限問題排除在外！