代码之家  ›  专栏  ›  技术社区  ›  el.pescado - нет войне

如何使用OpenOffice::OODoc设置单元格样式?

  •  0
  • el.pescado - нет войне  · 技术社区  · 15 年前

    如何使用Perl中的OpenOffice::OODoc模块将样式应用于单元格?

    我试过:

    my $container = odfContainer("report1.ods", create => 'spreadsheet');
    
    my $doc = odfDocument (
                           container => $container,
                           part      => 'content'
                          );
    
    # Styles
    my $styles = odfDocument (
                           container => $container,
                           part      => 'styles'
                          );
    
    $styles->createStyle ('TTT',
            family       => 'cell',
            display-name => 'Table Headers',
            properties   => {
                'fo:font-weight' => 'bold',
                'fo:color'       => '#ffffff',
            }
    );
    
    {
        for (my $x = 0; $x < $X; $x++) {
            $doc->columnStyle ($sheet, $x, "TTT"); # does not work
            for (my $y = 0; $y < $Y; $y++) {
                my $cell = $doc->getTableCell ($sheet, $y, $x);
                $doc->cellValueType ($cell, $headers->[$x][1]);
                $doc->updateCell ($cell, $data->[$y][$x]);
                $doc->setStyle ($cell, 'TTT'); # does not work
                $doc->cellStyle ($cell, 'TTT'); # does not work
            }
        }
    }
    
    1 回复  |  直到 15 年前
        1
  •  1
  •   Sinan Ünür    15 年前

    看到了吗 style

    style(object [, style])

    返回文本或图形对象的样式名称。如果第一个 参数是“母版页”(请参阅OODoc::Styles),它甚至返回 关联的“页面布局”。

    争论。

    推荐文章