Tag: perl

无法使用PERL脚本打开工作簿

我正在使用PERL脚本通过OLE在现有的Excel文件上创build一个工作簿。 我想用这个指令添加一个新的工作簿 – $Book = $Excel->Workbooks->Add(); 然后用它进行一定的操作。 然而,在执行这个代码时,我遇到$ Book总是等于零的情况,而且之后excel变得没有响应。 我包括下面的代码片段: use File::Spec; use Win32::OLE; use File::Basename; use Cwd 'abs_path'; use Win32::OLE::Const 'Microsoft Excel'; use Win32::OLE qw(in with); use Win32::OLE::Variant; use Win32::OLE::NLS qw(:LOCALE :DATE); use constant false => 0; use constant true => 1; use constant NULL => 0; my $Excel = ""; my $Book = […]

Excel进行分组

我有一个excel,其中第一列包含1.1,1.2,1.3等学生的卷号,第二列包含他们在每个学期30 40 60的分数。 我想知道每个学生得分最高分只有我的优秀。 我有几乎1000名学生。 以下是格式。 想要添加,我想要使用Perl脚本语言来做到这一点 Students Marks Obtained 1.1 45 1.1 68 1.1 69 1.2 70 1.2 14 1.2 48 . . . 9.9 87 9.9 76 9.9 66 9.9 100

如何使用Excel :: Writer :: XLSX添加数据透视表

现在我有一个关于如何将数据透视表添加到Excel文件(V2007)与Excel :: Writer :: XLSX的问题。 我一直在寻找答案,但我找不到任何答案。 你知道吗? 谢谢你的帮助。

如何使用Spreadsheet :: ParseExcel新build一个工作表

假设我只有一张表单的template.xls 我想生成一个包含许多工作表的新的xls,每个工作表都使用template.xls中的工作表作为模板 它看起来对我来说, SaveParser只能创build一个新的XLS与它具有和修改它,我怎样才能在新的XLS新的副本表? 我尝试了下面的代码,但没有运气 my $parser = new Spreadsheet::ParseExcel::SaveParser; my $template = $parser->Parse('template.xls'); my $workbook = $template->SaveAs('new.xls'); push @{$workbook->worksheets()}, $workbook->sheets(0); $workbook->close();

在perl中使用win32 :: OLE捕获Excel单元格/列和Excel表单页眉和页脚的filter

如何使用Win32 :: OLE捕获在Microsoft Excel工作表中为列的特定单元格定义的筛选器。 是否有任何内置函数来检查是否为该单元格定义了filter,然后进行捕获? 如何使用Win32:OLE捕获Excel工作表的页眉和页脚? 一直在寻找很多,但找不到任何东西。

将一个OLE对象添加到属性失败,并显示“Win32 :: OLE(0.1709)错误0x80020003:PROPERTYPUTREF”

以下脚本按预期工作。 use warnings; use strict; use Win32::Ole; use Win32::OLE::Const 'Microsoft.Excel'; $Win32::OLE::Warn = 3; my $excel = CreateObject Win32::OLE 'Excel.Application' or die; $excel->{'Visible'} = 1; my $workbook = $excel -> workbooks -> add(1); my $sheet = $workbook -> sheets(1); my $shape = $sheet -> shapes -> addChart; my $chart = $shape -> chart; $chart -> {chartType} […]

使用Perl在电子邮件正文中embeddedExcel图表

在Linux上使用Perlembeddedexcel图表是否可能? 我正在使用perl的Excel :: Writer :: XLSX模块来创build图表。 我想发送这个excel作为附件(已经这样做)。 但是同时我也希望在图表上有出色的performance。

将CSV转换为Excel会导致文件损坏

我使用下面的perl脚本将多个csv文件转换为excel电子表格,其中基本上是链接中代码的修改版本,但是我无法打开输出excel文件,它会popup消息“The file is corrupted”。 #!/usr/intel/bin/perl -W use strict; use Spreadsheet::WriteExcel::Big; use Text::CSV_XS; # Check for valid number of arguments if (($#ARGV < 1) || ($#ARGV > 2)) { die("Usage: csv2xls csvfile_dir xlsfile\n"); }; my $csvdir = $ARGV[0]; my $outfile = $ARGV[1]; # Create a new Excel workbook my $workbook = Spreadsheet::WriteExcel::Big->new($outfile); my $csvfile = ""; […]

读取/parsingXLSX文件,保留字体

有没有一个Perl模块/程序/方法,可以在Linux内部读取字体格式的XLSX文件中的文本? 它不一定是Perl,但Perl是我最熟悉的,所以Perl是最好的。 例如,一个单元格可能会说: 金刚是我最喜欢的书。 我比1984年更喜欢它。 我阅读了一堆post,下载了一堆perl模块和示例,但都是简单的提取文本。 我真的想保持格式。

Perl MIME :: Lite发送空的Excel文件

我正在使用Spreadsheet :: WriteExcel在perl中创build一个excel文件。 我的代码是这样开始的 my $workbook = Spreadsheet::WriteExcel->new('map.xls'); my $worksheet = $workbook->add_worksheet('map'); 将一些数据添加到workSheet 接着 $workbook->close() or die "Error closing file: $!"; 但是我得到的excel文件只包含一行错误信息 我的MIME附件代码是这样的 $msg->attach( Type => 'application/vnd.ms-excel', Path => $sNoticeFile, Disposition => "attachment", ); 有人可以告诉我什么是缺less/错误的代码? 谢谢