Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Sergey Gernichenko                   2:5079/32.34   21 Mar 2001  22:06:41
 To : All
 Subject : Excel
 -------------------------------------------------------------------------------- 
 
 
 Подскажите, пожалуйста, какую доку почитать, чтобы осущестьвить управление
 сабжем на виндовой тачке из Perl?
 Hу я про OLE, есть примерчик в дистре Perl.
 ==================== C:\Perl\eg\excel1.pl ===============
 use OLE;
 $application = CreateObject OLE 'Excel.Application' || die $!;
 $application->{'Visible'} = 1;
 $workbook = $application->Workbooks->Add();
 $worksheet = $workbook->Worksheets(1);
 $worksheet->Range("A1:D1")->{'Value'} = ["North","South","East","West"];
 $worksheet->Range("A2")->{'Value'} = 5.2;
 $worksheet->Range("B2")->{'Value'} = 10;
 $worksheet->Range("C2")->{'Value'} = 8;
 $worksheet->Range("D2")->{'Value'} = 20;
 $range = $worksheet->Range("A1:D2");
 $chart = $workbook->Charts->Add;
 #$chart->ChartWizard(range,"x13DPie",7,"x1Rows",1,0,2,"Sales Percentages" );
 $workbook->{'Saved'} = 1;
 $application->ActiveWorkbook->Close(0);
 $application->Quit();
 =====================================================================
 
 С уважением Сергей.
 
 --- GoldED+/W32 1.1.4.7
  * Origin: Всё идет хорошо. Только мимо (c) (2:5079/32.34)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 Excel   Sergey Gernichenko   21 Mar 2001 22:06:41 
Архивное /ru.perl/33483ab8d28c.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional