Win32::OLE - Excel chart location

Hello fellow monks, I use Win32::OLE to create excel file.

I create a chart object within my sheet using:

$chart->Location(xlLocationAsObject, "sheet1");
[download]

works!

My question - how can I place the chart in a specific location within the sheet?
(x,y position or cell area are both good enough options).

Thanks,
Mickey

Comment on Win32::OLE - Excel chart location Download Code
Re: Win32::OLE - Excel chart location by technojosh (Priest) on Oct 08, 2007 at 14:39 UTC
I haven't seen your code, but assuming you have a correct worksheet object, try something like: `$yourWorksheetObject->Range("a1")->{Value}=$chart;` [download] (The "a1" range can be whatever you need, just there for example)	[reply] [d/l]
Re: Win32::OLE - Excel chart location by bmann (Priest) on Oct 08, 2007 at 20:16 UTC
You can't use a cell to position a chart. You can assign an (x, y) position. use warnings; use strict; use Win32::OLE qw(in); use Win32::OLE::Const 'Microsoft Excel'; use Win32::OLE::Const 'Microsoft Office .* Object Library'; my $excel = Win32::OLE->new('Excel.Application'); $excel->{Visible} = 1; my $xls = $excel->Workbooks->Add; my $chart = $excel->Charts->Add; $chart->Location( xlLocationAsObject, 'Sheet1' ); # find the chart (it can only be moved via 'shape') <- this can be the + hard part! # if it is the first chart, it will be named 'Chart 1'. # If there has already been n charts on that sheet it'll be named # 'Chart n+1' my $shape; foreach my $s ( in $excel->ActiveSheet->Shapes() ) { $shape = $s; last if $shape->type == msoChart; # msoChart == 3 } # move the chart to (0, 0) $shape->{Left} = 0; $shape->{Top} = 0; [download] You can also move a chart relative amounts with `IncrementLeft` and `IncrementTop`.	[reply] [d/l] [select]


good chemistry is complicated, and a little bit messy -LW
	PerlMonks