如何通过Perl在Excel中为页面设置缩放选项留出空间_Excel_Perl

如何通过Perl在Excel中为页面设置缩放选项留出空间

excel perl

如何通过Perl在Excel中为页面设置缩放选项留出空间,excel,perl,Excel,Perl,是否有一种方法可以通过perl在excel中仅适合1页宽（高度应为空），以便我们可以将缩放设置为“一页上适合所有列”。下同尝试了“”$worksheet1->fit_to_pages（1,0）；”，但正在更改为1,1（1宽1高）请看，您没有提供任何代码。因此没有人能帮助你。模块工作正常。演示： use strict; use warnings; use Excel::Writer::XLSX; my $workbook = Excel::Writer::XLSX->new( 'te

是否有一种方法可以通过perl在excel中仅适合1页宽（高度应为空），以便我们可以将缩放设置为“一页上适合所有列”。下同

尝试了“”$worksheet1->fit_to_pages（1,0）；”，但正在更改为1,1（1宽1高）

请看，您没有提供任何代码。因此没有人能帮助你。模块工作正常。演示：

use strict;
use warnings;
use Excel::Writer::XLSX;

my $workbook  = Excel::Writer::XLSX->new( 'test.xlsx' );
my $worksheet = $workbook->add_worksheet();

$worksheet->write( 0, 0, "Hi" );
$worksheet->fit_to_pages(1,0);

现在，在我的Excel中打开后，它显示：

或者在页面设置中

即使您在

xlsx

中检查

xml

（例如，将

.xlsx

重命名为

.zip

并解压缩），您也会在

工作表.xml

中找到以下片段：

<pageSetup fitToHeight="0" orientation="portrait"/>

如您所见，生成的

.xlsx

文件的内容正确地将

fitToHeight

（也称为“高”）设置为

所以，正如我在评论中所说的，问题就在你这边。

看，你没有提供任何代码。因此没有人能帮助你。模块工作正常。演示：

use strict;
use warnings;
use Excel::Writer::XLSX;

my $workbook  = Excel::Writer::XLSX->new( 'test.xlsx' );
my $worksheet = $workbook->add_worksheet();

$worksheet->write( 0, 0, "Hi" );
$worksheet->fit_to_pages(1,0);