如何使用Perl和Win32 :: OLE隐藏PowerPoint ppt中表格的边框？

Question

我们如何通过Perl在PowerPoint中更改表格样式（隐藏表格边框）？

类似的东西：

$table->Table->Style->NoBorder

我在开始时使用此代码：

use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft PowerPoint';
$Win32::OLE::Warn = 2; 
use File::Basename;
use Time::Piece;

我得到这样的表格：

my $table = $Slide->Shapes->AddTable(
  $rws, $cls, $item{LEFT}, $item{TOP}, $item{WIDTH}, $item{Hei‌​ght}
);

Answer 1

基于Programmatically Working with Table Styles in PowerPoint 2010，您可以使用

$table->ApplyStyle('{2D5ABB26-0587-4C30-8999-92F81FD0307C}');

CLSID可能不适用于PP 2010以外的版本。

如果您想让其他人更方便地帮助您，请发布简短但可运行的示例。