Tag: perl

有没有办法轻松采取3文本文件，并通过脚本变成一个多选项卡的Excel表？: 有没有办法轻松采取3文本文件，并通过脚本变成一个多选项卡的Excel表？文件是file1.txt，文件2.txt，file3.txt – 我想它输出到excelsheet1.xls 3个选项卡。

Perl Excel :: Writer :: XLSX公式计算时打开工作簿: 我正在写一个使用Excel :: Writer :: XLSX的xlsx公式。当我用Excel打开工作簿时，公式单元格中有一个0。 Excel中的“计算选项”设置为“自动”。点击“立即计算”button或按F9键无法做任何事情。按下CTRL + ALT + F9的作品。有没有办法确保在打开工作簿时计算公式？编辑：单元格内容示例“= A3 + A4”。

与Perl的Excel文件中的列标题: 我有一个有很多列的Excel文件，但我只需要对这三列进行一些计算。我正在使用SpreadSheet::ParseExcel遍历我的Excel文件。如何指定我想用perl的列？

使用Perl分割在csv文件？: 朋友，我有两个CSV文件，我需要转换为电子表格。它包含以下数据; "xxx","yyy","97,234" . . . 和 abc,def,"23,475" . . . . 现在有什么问题是我需要打开这个csv文件，并写入每个logging到另一个文件。我已经尝试与拆分function作为split(,@lines)这将拆分所有昏迷分离值，所以拳头文件第三个logging也所以我试过另一种方式split(",@lines)这种方法将不会支持第二个文件！任何方法来处理这种情况下使用perl

Perl – 无法访问Excel文件: 我正在尝试探索Perl并做一些示例代码。我试着读excel使用Perl。我下载了Spreadsheet-ParseExcel并安装在我的机器上。我尝试了下面的代码：码 #!"C:\Perl64\bin\perl.exe" use CGI; use strict; use Spreadsheet::ParseExcel; my $FileName = “C:/excel/Onsite_Report(15).xlsx"; my $parser = Spreadsheet::ParseExcel->new(); my $workbook = $parser->parse($FileName); die $parser->error(), ".\n" if ( !defined $workbook ); # Following block is used to Iterate through all worksheets # in the workbook and print the worksheet content for my $worksheet ( […]

用Win32 :: OLE使用perl修改excel电子表格中的单元格范围: 我想将一列数组中的值添加到Excel电子表格中的一系列单元格中; 我写了以下内容，但是失败了： use Win32::OLE; use Cwd; eval {$excel = Win32::OLE->GetActiveObject('Excel.Application')}; die "Excel not installed" if $@; unless (defined $excel) { $excel = Win32::OLE->new('Excel.Application', sub {$_[0]->Quit;}) or die "Oops, cannot start Excel"; } $workbook = $excel->Workbooks->Open(getcwd() . "/test.xlsx"); $worksheet = $workbook->Worksheets(1); @matrix = ( [0, 1], [2, 3] ); $worksheet->Range("B5:C6")->{Value} = @matrix; $worksheet->Save; 上面的代码更新单元格B5：C6与（2，2，2），而不是（0，1，2，3），我无法弄清这个原因…我做错了什么？

无法在Perl中使用Spreadsheet :: ParseExcel读取Excel 2013文件: 我有一个简单的代码片段，即不加载Excel文件。无法弄清楚我做错了什么： my $parser = Spreadsheet::ParseExcel->new(); my $workbook = $parser->parse("test.xlsx"); if ( !defined $workbook ) { print("Unable to load workbook \n"); } 我也试着运行文件的完整path。 test.xlsx是我使用Perl 5.14.2在Windows中运行的Excel 2013文件，文件与.pl文件位于同一文件夹中。

为什么Spreadsheet :: XLSX在不同的机器上parsingdate不一致？: 我创build了一个从XLSX工作表读取信息的Perl脚本。由于在一台机器上运行良好，另一台机器没有运行，所以我join了一个简短的debugging部分： $sheetdate = ($sheet -> {Cells} [0] [$sheet->{MaxCol}]) -> value(); print "value: $sheetdate\n"; $sheetdate = ($sheet -> {Cells} [0] [$sheet->{MaxCol}]) -> get_format(); print "getformat: $sheetdate\n"; 在一台机器上打印： value: 2016-01-18 getformat: yyyy-mm-dd 另一方面： value: 1-18-16 getformat: md-yy 相同的脚本，相同的工作表，不同的结果。我相信环境中的东西会有所不同，但是我不知道究竟是什么。任何提示？

为什么我不能使用Perl的Spreadsheet :: WriteExcel将图表添加到Excel电子表格中: 当使用Spreadsheet :: WriteExcel在电子表格中创build图表时，它创build的文件不断出现读错误 Excel在“Report.xls”中发现不可读的内容并问我是否要恢复它。我已经解决了代码中的问题行是我实际插入图表的地方 $chartworksheet->insert_chart(0, 0, $linegraph, 10, 10); 如果我注释掉这一行，数据是好的（当然，没有图表）。其余的相关代码如下（这里没有定义的variables是在代码的前面定义的，比如$lastrow ）。 printf("Creating\n"); my $chartworksheet = $workbook->add_worksheet('Graph'); my $linegraph = $workbook->add_chart(type => 'line', embedded => 1); $linegraph->add_series(values => '=Data!$D$2:$D$lastrow', name => 'Column1'); $linegraph->add_series(values => '=Data!$E$2:$E$lastrow', name => 'Column2'); $linegraph->add_series(values => '=Data!$G$2:$G$lastrow', name => 'Column3'); $linegraph->add_series(values => '=Data!$H$2:$H$lastrow', name => 'Column4'); $linegraph->set_x_axis(name => 'x-axis'); […]