作者darkleo (里欧)
看板Perl
标题[问题] Perl 写入 Excel 的问题
时间Wed Dec 2 14:23:33 2015
#!/usr/bin/perl
use Win32::OLE;
$xlApp = Win32::OLE->new('Excel.Application');
$xlApp->{Visible} = 1;
# Create a new workbook
$xlBook = $xlApp->Workbooks->Add;
$col = $row = 1;
$xlBook->write($row, $col, 'aa');
$xlBook->write(1, $col, 'bb');
$xlBook->write('A3', 123);
exit;
# Wait for user input...
print "Press <return> to continue...";
$x = <STDIN>;
# Clean up
$xlBook->{Saved} = 1;
$xlApp->Quit;
$xlBook = 0;
$xlApp = 0;
print "All done.";
程式码如上,不知道为何只能开启Excel後,却没有在相对应位置输入字
是语法有错还是少安装了什麽吗??
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 211.75.12.108
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Perl/M.1449037415.A.5E0.html
1F:→ CindyLinz: 没有用过 Win32::OLE.. QQ 不过我看说明里面的范例 12/02 16:01
2F:→ CindyLinz: 储存格的写法是 $sheet->Cells(1,1)->{Value} = "foo"; 12/02 16:01
3F:→ CindyLinz: 这样欸? 12/02 16:01
5F:→ CindyLinz: $sheet = $xlBook->Worksheets(1); 12/02 16:02
6F:→ darkleo: 嗯?不然还有什麽其他的可以输入Excel嘛!? 12/02 16:33
7F:→ Neisseria: 看看 Spreadsheet::WriteExcel 或 Data::Table::Excel 12/02 16:48
8F:→ CindyLinz: 你的写法和 sample 不一样啊? 不试试 sample 的写法吗? 12/02 21:34