my $range = "A1:C49";
my $sheet = $workbook -> Worksheets("Graph");
$sheet -> Activate();
my $chart = $sheet -> ChartObjects("Chart 1");
$chart -> Activate();
# $chart -> SeriesCollection(1)->Select();
$chart->SetSourceData({Source => $sheet, Range => $range, PlotBy => xlColumns});