如何自動化 Excel 使用 Win32 Perl

文章翻譯 文章翻譯
文章編號: 214797 - 檢視此文章適用的產品。
全部展開 | 全部摺疊

結論

熟悉使用 Perl 的開發人員可以利用自動化功能在 Win32 與應用程式 (例如 Microsoft Office 整合的 Perl 中。本文提供一些範例 Perl 的程式碼,將資料傳送至 Microsoft Excel,然後建立圖表和樞紐分析表。

其他相關資訊

在執行任何 Perl 指令碼之前,您需要有 Perl 在您的機器上安裝並設定。Perl 自由散發,因為任何人都可以為 Win32 提供 Perl 的實作。兩個常用的 ported 的版本是由 ActiveState、 先前 ActiveWare 或 Mortice Kern 系統 (MKS) 提供。這個範例使用 Win32 ActiveState 的 Perl。

請遵循下列建立並執行範例步驟:
  1. 如果您不具有最新 ActiveState ActivePerl 套件安裝在您的機器上,而想要嘗試此範例,請將其從下載:
    http://www.activestate.com/ActivePerl
  2. 啟動 notepad.exe 並建立新的檔案名稱為下列的 Perl 指令碼的 perlxl.pl:
    use Win32::OLE;
    
    # Start Excel and make it visible
    $xlApp = Win32::OLE->new('Excel.Application');
    $xlApp->{Visible} = 1;
    
    # Create a new workbook
    $xlBook = $xlApp->Workbooks->Add;
    
    # Our data that we will add to the workbook...
    $mydata = [["Item",     "Category", "Price"], 
               ["Nails",    "Hardware",  "5.25"],
               ["Shirt",    "Clothing", "23.00"],
               ["Hammer",   "Hardware", "16.25"],
               ["Sandwich", "Food",      "5.00"],
               ["Pants",    "Clothing", "31.00"],
               ["Drinks",   "Food",      "2.25"]];
    
    # Write all the data at once...
    $rng = $xlBook->ActiveSheet->Range("A1:C7");
    $rng->{Value} = $mydata;
    
    # Create a PivotTable for the data...
    $tbl = $xlBook->ActiveSheet->PivotTableWizard(1, $rng, "", "MyPivotTable");
    
    # Set pivot fields...
    $tbl->AddFields("Category", "Item");
    $tbl->PivotFields("Price")->{Orientation} = 4; # 4=xlDataField
    
    # Create a chart too...
    $chart = $xlBook->Charts->Add;
    $chart->SetSourceData($rng, 2);
    $chart->{ChartType} = 70; # 3D-pie chart
    $chart->Location(2, "Sheet4");
    
    # 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.";
    					
  3. 在您建立該檔案的所在的目錄中鍵入 perlxl.pl 從命令列,或從檔案總管按兩下它。您應該會看到 Microsoft Excel 啟動,且新的活頁簿取得建立樞紐分析表和一個圖表。
(c) Microsoft Corporation 1999,保留所有的權限。由 Joe Crump,Microsoft Corporation 的貢獻。

屬性

文章編號: 214797 - 上次校閱: 2007年1月24日 - 版次: 4.3
這篇文章中的資訊適用於:
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Office 2000 Developer Edition
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Excel 97 Standard Edition
關鍵字:?
kbmt kb3rdparty kbautomation kbhowto KB214797 KbMtzh
機器翻譯
重要:本文是以 Microsoft 機器翻譯軟體翻譯而成,而非使用人工翻譯而成。Microsoft 同時提供使用者人工翻譯及機器翻譯兩個版本的文章,讓使用者可以依其使用語言使用知識庫中的所有文章。但是,機器翻譯的文章可能不盡完美。這些文章中也可能出現拼字、語意或文法上的錯誤,就像外國人在使用本國語言時可能發生的錯誤。Microsoft 不為內容的翻譯錯誤或客戶對該內容的使用所產生的任何錯誤或損害負責。Microsoft也同時將不斷地就機器翻譯軟體進行更新。
按一下這裡查看此文章的英文版本:214797
Microsoft及(或)其供應商不就任何在本伺服器上發表的文字資料及其相關圖表資訊的恰當性作任何承諾。所有文字資料及其相關圖表均以「現狀」供應,不負任何擔保責任。Microsoft及(或)其供應商謹此聲明,不負任何對與此資訊有關之擔保責任,包括關於適售性、適用於某一特定用途、權利或不侵權的明示或默示擔保責任。Microsoft及(或)其供應商無論如何不對因或與使用本伺服器上資訊或與資訊的實行有關而引起的契約、過失或其他侵權行為之訴訟中的特別的、間接的、衍生性的損害或任何因使用而喪失所導致的之損害、資料或利潤負任何責任。

提供意見

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com