用Word绘制表格

2024-08-22 13:46:48

字体：大中小

来源：转载

供稿：网友

一大早就收到读者的问题..所以就顺便收录在这边。
这个范例是透过com利用word 绘置一个5x10的表格，并将一些数据一一塞入各个区域内。

<?php
$word = new com("word.application") or die("无法启动 word 程序！");

$word->visible = 1;
$doc = $word->documents->add();

$doc->sections->add($word->selection->range,0);// 增加一个分节
$section = $doc->sections(1); // 获取第一小节对象
$range   = $section->range;   // 产生 range 对象
$table   = $doc->tables->add($range ,5, 10); // 产生 5x10的表格

// 将数据塞入表格
for ($i=1; $i<=10; $i++) {
    for ($j=1; $j<=5; $j++) {
        $cell      = $table->cell($j, $i);
        $cellrange = $cell->range;
        $cellrange->insertbefore(chr(0x40+$j).chr(0x40+$i));
    }
}

$word->documents[1]->saveas("c://word.doc");
$word->quit();
$word->release();
$word = null;
?>