OLE function

1. 因為要做策略分析要用到Excel的套件來幫我把圖表做好,不得已只好打開API lib,如果已經內建好了Active Perl,裡面有個model "Win32::OLE" 的套件,這是存取excel API lib 微軟的範例網頁提供了簡易的教學範例 http://support.microsoft.com/kb/214797/zh-tw
2. sample code use Win32::OLE; $xlApp = Win32::OLE->new('Excel.Application'); ..... // 填入我們所需要的欄位,跟參數 $mydata = [["Item", "Category", "Price"], ["Nails", "Hardware", "5.25"], ["Shirt", "Clothing", "23.00"], ["Hammer", "Hardware", "16.25"], ["Sandwich", "Food", "5.00"], ["Pants", "Clothing", "31.00"], $rng = $xlBook->ActiveSheet->Range("A1:C7"); //抓column A1 到 column C7的值 # Create a chart too... $chart = $xlBook->Charts->Add; $chart->SetSourceData($rng, 2); $chart->{ChartType} = 70; # 3D-pie chart $chart->Location(2, "Sheet4"); // plot chart PS: Excel有支援的圖形介面有 "折線圖", "圓餅圖", "柱狀圖"... 其控制碼可以參考 Excel API http://www.fred.net/brv/chart/ 最後會把統計的數字自動建出我們所要圖表. 其他參考 http://www.xav.com/perl/faq/Windows/ActivePerl-Winfaq12.html http://www.ngbdigital.com/perl_ole_excel.html