how to control the graph size using macros

[cmg70]

I try to write a perl script (OLE interface) to publish a powerplay report. This is the script:

#!/bin/perl
use Win32::OLE;
my $ChartApp = new Win32::OLE( "PowerPlay.Application") || die "Cannot create object\n";
my $ChartRep = new Win32::OLE( "PowerPlay.Report") || die "Cannot create object\n";
$ChartRep->Open("D:\\cpu.ppr");
my $objPPGraphs=$ChartRep->Graphs(1);
$objPPGraphs->{MaxVisibleBars}=2;
$ChartApp->Select();
$ChartApp->SizeSelected(1200);
$ChartRep->Publish("D:\\temp");
$ChartRep->Close();
$ChartApp->Close();

The question is how to control the size of the graph. I've searched in the object model but I did'nt find any property. The default graph is too small