Perl使用Win32 :: OLE模塊Excel 2007-不能生成圖表

Question

我正在運行perl64上的簡單腳本來在excel上生成圖表，但我得到的錯誤沒有生成任何圖表。
它打開excel表單，將數據寫入表單但沒有圖表。

Win32::OLE(0.1709) error 0x80020003: "Member not found" 
    in PROPERTYPUT "ChartType" at C:\path\test.pl line 20. 

這裏是我的系統規格

• PERL版本：主動Perl的64 v5.16.3
• WIN32 OLE：0.1709
• Excel版本：Excel 2007中SP3

燦任何人請給我一些關於如何刪除此錯誤並生成圖表的輸入？

use strict; 
use Win32::OLE; 
use Win32::OLE::Const 'Microsoft Excel'; 

my $Excel = Win32::OLE->new("Excel.Application"); 
$Excel->{Visible} = 1; 
$Win32::OLE::Warn = 3; 
my $Book = $Excel->Workbooks->Add; 
my $Sheet = $Book->Worksheets(1); 
my $Range = $Sheet->Range("A2:C7"); 
$Range->{Value} = 
[['Delivered', 'En route', 'To be shipped'], 
[504, 102, 86], 
[670, 150, 174], 
[891, 261, 201], 
[1274, 471, 321], 
[1563, 536, 241]]; 

my $Chart = $Excel->Charts->Add; 
$Chart->{ChartType} = xlAreaStacked; 
$Chart->SetSourceData({Source => $Range, PlotBy => xlColumns}); 
$Chart->{HasTitle} = 1; 

Answer 1

嘗試將此行更改：​​

$Chart->SetSourceData({Source => $Range, PlotBy => xlColumns}); 

這一個：

$Chart->SetSourceData($Range, xlColumns);