Perl 利用Win32::OLE *** 作Excel 技巧和诀窍

概述我翻译这个教程的目的就是为了回答Perl利用Win32::OLE *** 作Excel的有关问题，这些问题会经常遇到，但是没有一个浅显易懂的教程。如果你懂Perl，又有点VBA的知识，那么这篇短小精悍的教程你肯定轻松拿下。 我要涵盖许多主题，从处理日期和执行边界，大小列，关闭那些讨厌的警告对话框，遍历工作表和底纹和格式的单元格及其内容的集合。 资源 你需要一个很好的对象资源管理器来映射合适的方法，对象和每 @H_502_1@

我翻译这个教程的目的就是为了回答Perl利用Win32::olE *** 作Excel的有关问题，这些问题会经常遇到，但是没有一个浅显易懂的教程。如果你懂Perl，又有点VBA的知识，那么这篇短小精悍的教程你肯定轻松拿下。

我要涵盖许多主题，从处理日期和执行边界，大小列，关闭那些讨厌的警告对话框，遍历工作表和底纹和格式的单元格及其内容的集合。

资源

你需要一个很好的对象资源管理器来映射合适的方法，对象和每个接口的属性。因为正好我有VB和VC++在我的电脑上，所以VB自带的对象浏览器将适当的项目关联起来（实际上，为了轻松实现引用，我给所有OFFICE对象创建了带引用的空项目）。如果你没有VB，dont worry be happy，你可以用ActiveState的帮助文档找到需要的资料，我推荐Jan dubois写的"Win32::olE - Type library browser"。下面就开始正式的代码旅程了。

代码

          #!c:\perl\bin\ use strict; use Win32::olE qw(in with); use Win32::olE::Const 'Microsoft Excel'; use Win32::olE::Variant; use Win32::olE::NLS qw(:LOCALE :DATE); $Win32::olE::Warn = 3; # DIE on Errors. # ::Warn = 2; throws the errors,but # # expects that the programmer deals # my $excelfile = '<MYPATH>\perltut.xls';                    

首先，我们需要一个EXCEL对象，如果没有打开的EXCEL代谢，那么我们创建一个新的EXCEL对象，并定义其如何退出。

my $Excel = Win32::olE->GetActiveObject('Excel.Application') || Win32::olE->new('Excel.Application','Quit'); 

针对此程序，我用displayAlerts属性关闭了讨厌的警告对话框。

$Excel->{displayAlerts}=0;  

现在，我们为刚创建的EXCEL对象，添加一个新的WORKBOOK，并保存为刚才定义的文件名$excelfile。

my $Book = $Excel->Workbooks->Add(); $Book->SaveAs($excelfile); #Good habit when working with olE,save+often.

当然我们可以像下面这样轻松打开已经存在的WORKBOOK。

my $Book = $Excel->Workbooks->Open($excelfile);

总结

以上是内存溢出为你收集整理的Perl 利用Win32::OLE *** 作Excel 技巧和诀窍全部内容，希望文章能够帮你解决Perl 利用Win32::OLE *** 作Excel 技巧和诀窍所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。