Perl通过WIN32 OLE来操作EXCEL

最近要用Perl(通过Win32::OLE)来操作EXCEL,在网上没找到类似的内容，好不容易在一本书上找到点入门知识，再加上自己捣鼓了一通,总算有点眉目，在此做个备份,供大家和我一起参考 ^_^

#!usr/bin/perl
use strict;
use warnings;
use Win32::OLE; #导入win32 OLE包

my $dir = 'D://myperl//win32ole//'; #在此目录下新建两个EXCEL
my $src_name = $dir."test1"."/.xls";
my $dst_name = $dir."test2"."/.xls";

my $nowstr;

#新建一个EXCEL应用对象，然后我们就可以对excel进行操作。
my $app_xls = Win32::OLE->new('Excel.Application', sub{$_[0]->Quit})
or die"Can't install Excel01!";

#打开一个EXCEL文件，'True' 表示是只读

my $src_book = $app_xls->WorkBooks->Open($src_name, 0, 'True');
my $src_sheet = $src_book->Worksheets(1); #选中一工作表
$nowstr = $src_sheet->Cells(1,'A')->{Value}; #取得一单元格中数据

print($nowstr);
$src_sheet->Cells(1,'A')->{Value}="change"; #修改一单元格中数据

my $dst_book = $app_xls->WorkBooks->Open($dst_name);
my $dst_sheet = $dst_book->Worksheets(1);
$app_xls->{DisplayAlerts} = 'False'; #关掉excel的提示，比如是否保存修改之类的
#$dst_book->Worksheets(1)->Delete; #删除一工作表

#从一个excel里复制一工作表到另一excel中
$src_book->Worksheets(1)->Copy($dst_book->Worksheets('sheet3'));
$dst_book->Save; #保存所做修改
$app_xls->{DisplayAlerts} = 'True'; #恢复提示

undef $src_book;
undef $dst_book;

undef $app_xls; #关掉所打开的excel应用

参考资料：

1、《Perl5编程核心技术》——杜经农（北京希望电子出版社）2000.11第一版

2、Microsoft Excel 开发人员参考，通过OLE来对EXCEL进行操作的一些说明，关于OLE相关支持，可在微软的 MSDN上找到，我的blog技术杂谈目录下也有对OLE的简介。

PS：转载请保留以下信息

Author：smilelance

From：http://blog.csdn.net/smilelance

Time：2006.05.23

转载于:https://www.cnblogs.com/secbook/archive/2006/05/23/2655521.html

Perl通过WIN32 OLE来操作EXCEL相关推荐

Delphi OLE方法操作Excel
Delphi OLE方法操作Excel 来源:http://www.ltesting.net/ceshi/ruanjianceshikaifajishu/rjcskfyy/2008/0519/154 ...
ASP.NET通过OLE DB操作Excel
ASP.NET 操作Excel目前有比较多的方法,常用的有三种:COM组件,OLE DB,和NOPI插件. #1 COM组件优点: (1)能读取各种版本的Excel,包括2003,2007,2010 ...
MFC中使用OLE/COM操作EXCEL的方法
使用OLE的方法操作EXCEL,首先计算机必须安装excel,这样才会有接口暴露出来.本次使用大神封装好的类. excel作为OLE/COM库插件,定义好了各类交互接口,而且这些接口是跨语言的,可以导 ...
perl Win32::OLE open 文件error
perl 中 Win32::OLE调用Excel file 打开出现 Win32::OLE(0.1702) error 0x80010105 或者 workbooks value 未定义这类错误,目 ...
如何使用SAP Intelligent Robotic Process Automation自动操作Excel
今天是鼠年正月十二.这是Jerry鼠年的第11篇文章,也是汪子熙公众号总共第210篇原创文章. 之前Jerry的文章使用ABAP操作Excel的几种方法,介绍的是通过ABAP这门编程语言去操作Exc ...
如何使用 SAP Intelligent Robotic Process Automation 自动操作 Excel
机器人流程自动化 (Robotic Process Automation,简称 RPA) 是一种允许用户将企业重复的.基于规则的业务流程进行自动化的解决方案. 与需要将流程步骤硬编码到系统中的传统自动 ...
VS2010操作Excel编程
通过VC实现对Excel表格的操作的方法有多种,如:通过ODBC数据库实现,通过解析Excel表格文件,通过OLE/COM的实现.本文主要研究通过OLE/COM实现对Excel表格的操作. 本文源码的 ...
Perl 脚本运行时提示：Can‘t locate Win32/OLE.pm in @INC
犄角旮旯里面掏出来一个.pl的perl代码,一副古早味. 搜了一下最新的perl运行安装: https://www.activestate.com/products/perl/ 居然已经不是安装包式, ...
perl操作excel(更新+编辑excel)(更新+VLOOKUP公式使用+#VALUE!错误)
1.perl使用 use Spreadsheet::ParseExcel;和 use Spreadsheet::WriteExcel; 不能同时读写同一个excel文件. 用 Win32::OLE - ...

Perl通过WIN32 OLE来操作EXCEL

Perl通过WIN32 OLE来操作EXCEL相关推荐

最新文章

热门文章