Tag: perl

如何在Excel中通过Perl将页面设置缩放选项分隔出来: 有没有一种方法可以在excel中通过perl适应1页宽（高度应该是空白），以便我们可以将缩放比例设置为“适合所有列在一个页面上”。同下。试过“$ worksheet1-> fit_to_pages（1,0）;” ，但它正在变成1,1（1宽1高）。

如何设置单元格格式显示百分比格式与Excel :: Writer :: XLSX在多个区域设置的百分比1小数？: 我用Perl和Excel :: Writer :: XLSX生成XLSX文档。生成的文档将在具有多个不同区域设置的多个国家中打开。我想格式化一个单元格，因此内部显示的百分比数字在小数点后有一位数字。当我使用num_format=>9它显示零数字，当我使用num_format=>10它显示2位数字。当我使用0.0%的格式string时，它在一个语言环境中可以正常工作，但在另一个语言环境中不起作用，因为其他语言环境使用","而不是"." 作为小数分隔符。我如何格式化单元格显示数字以独立于语言环境的方式？

Excel :: Writer :: XLSX – 数据标签“单元格的值”选项: 我正在使用Excel 2013，在“格式数据标签”中有一个“从单元格中取值”选项，可以让我select任何单元格作为标签使用。我看过图表中的选项-> add_series -> data_labels ，似乎没有看到它在那里。所以我想知道是否有一些方法可以使用自定义标签？正如您在图像中看到的那样，有一个“格式化数据标签…”，select后，您可以在右侧看到“单元格的值”，select“select范围…”。

Excel SUM当前列（通过Excel :: Template）: 我正在使用Excel :: Template来通过perl生成一系列的Excel文件。不过，我需要在当前列上执行SUM函数。我知道我能做到 =SUM(3:15) 但是给出了3-15行中所有列的总和。有没有更简单的方法来做我想做的事情？

在Spreadsheet :: WriteExcel中组合格式对象: 在Spreadsheet :: WriteExcel中组合格式对象我有一个格式对象设置背景颜色，第二个设置数字格式。如果我申请一个，那么另一个申请一个细胞，第二个消灭第一个细胞的效应。即它们是相互排斥的。有没有一种很好的方法来结合他们？

perl win32 ole超时: 我使用Perl和Win32 :: OLE来自动执行一些Excel任务。由于Excel文件太大，所以这个过程需要花费相当多的时间来完成…但是在一夜之间离开之后，我认为它由于“超时”问题而卡住了。如果我减小文件大小，那就没问题。无论如何，增加超时？我的代码的一部分： # Open the rules file my $xlBook = $xlApp->Workbooks->Open("$file"); my $xlSheet = $xlBook->Worksheets(1); #Replace FALSE -> 0 $xlSheet->Cells->Replace ({ What => "FALSE", Replacement => "0" }); #Replace TRUE -> 1 $xlSheet->Cells->Replace ({ What => "TRUE", Replacement => "1" });

需要将数据作为string转换为Excel可读格式: 我有一个包含这种格式的datestring的数据文件： June 11, 2012 3:47:56 PM GMT-07:00 我已经使用Perl脚本来处理该文件中的一些其他数据元素，然后将其输出为Excel的csv。而不是愚弄Excel中的函数和公式来尝试将date – string转换为Excel可以读取的东西，我想我应该可以在Perl中更简单/快速地完成。目的/期望的最终结果是一个时间和date戳记，我可以在Excel中做简单的math运算（例如，通过设置时间戳来获得条目之间的年龄差异）。为此，我想结束我的date，看起来像这样： 6/11/2012 3:47:56 PM 真的，我只需要转换date，时间是完美的，并删除格林威治时间差异垃圾。我看过代码片段和对模块的引用，这些模块似乎是以另一种方式转换的，即从“6/24/12”到“2012年6月24日”，但是这对我来说是错误的方向。我在cpan中查找了模块时间:: piece，但并不真正了解它。我在一个Cygwin exec中工作，所以不是一个真正的unix系统，并没有很多的man页面或perldocs的方式。

用excel中的值searchperl中的所有行: 我试图用excelparsing数据到一个特定的XML格式，由另一个应用程序读取，然后创build数据的graphics表示。 excel表格被数据捕获者定期更新。我select了Spreadsheet :: Read模块，但是我遇到了问题。该表将被分成特定的单元格，这对应于特定的布局。该表将因此具有：国家| 城市| 郊区| 链接每行是不同的数据等我试图告诉脚本得到这样的每一行。 use Spreadsheet::Read; my $book = ReadData ("Captured_input.xlsx"); my @rows = Spreadsheet::Read::rows ($book->[1]); print "@rows\n"; 然而，这打印ARRAY（和一些hex数据）但是，我想它读取每一行和单元格，并像这样返回它： Country1，City1，Suburb1，link1 Country2，City2，Suburb2，link2 它每天运行，所以它不应该只读取文件结尾，它应该每次都读取整个表，所以如果有任何更改，它将重新发布的XML。如果我这样使用它，它会工作并返回数据，但是我需要手动指定每一行，但是我不能估计将来有多less行。 use Spreadsheet::Read; my $book = ReadData ("Captured_input.xlsx"); my @row = Spreadsheet::Read::cellrow ($book->[1], 4); print "@row\n,"; 一些input将不胜感激。

Perl Excel OLE错误从两个脚本simultanesouly打开不同的文件: 试图打开和写入数据到两个不同的Excel文件，而不同的Perl脚本，但同时。它不会抛出任何错误，如果一个接一个地运行。但在同时运行时，脚本的一个终止会出现以下错误。 entering No Error excel new created! Win32::OLE(0.1709) error 0x8001010a: "The message filter indicated that the application is busy" in METHOD/PROPERTYGET "Workbooks" at TwoExcelFiles.pl line 29. came out. sleeping 20 C:\Users\s.mailappan\Desktop\Test> Perl脚本-1： # ================ # Modules Required # ================ use Win32::OLE qw(in with); # OLE Automation extensions use Win32::OLE::Const 'Microsoft Excel'; […]

如何parsingzip文件中的excel文件？: 我希望能够parsing一个zip文件中的excel。我已经能够parsing压缩文件，以返回该压缩文件中的文件，如果正则expression式匹配带来了一个Excel文件，我想parsing文件。以下是parsingzip文件的excel电子表格名称的脚本。 #!/usr/bin/perl use strict; use warnings; use Archive::Zip; use Spreadsheet::ParseExcel; my $zipFile = Archive::Zip->new(); my $xl_file = ""; #open zipfile $zipFile->read( '/home/user/Desktop/test.zip' ) == 0 || die "cannot read zip file\n"; #find all files within zipfile my @files = $zipFile->memberNames('/home/user/Desktop/test.zip'); foreach my $file (sort @files) { #find all excel files if($file =~ m/(.*xls)/){ […]