use strict;
# Create Chart
use Win32::OLE;
use Win32::OLE::Const 'Microsoft Excel';
my $Excel = Win32::OLE->new("Excel.Application");
$Excel->{Visible} = 1;

#my $Book = $Excel->Workbooks->Add;
my $Workbook = "Auswertung022004.xls";
my $activeWorkbook = $Excel->Workbooks->Open($Workbook);

my $Sheet = $activeWorkbook->Worksheets("INF2");