如何在Excel中通过Perl将页面设置缩放选项分隔出来

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

试过“$ worksheet1-> fit_to_pages（1,0）;” ，但它正在变成1,1（1宽1高）。

Answer 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中打开后，它显示：

或在PageSetup中

即使您在xlsx检查了xml （例如将.xlsx重命名为.zip和unzip），您将在sheet.xmlfind以下snipet：

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

正如您所看到的，生成的.xlsx文件的内容正确设置为fitToHeight （又名“tall”）为0 。

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