Beefy Boxes and Bandwidth Generously Provided by pair Networks vroom
XP is just a number
 
PerlMonks  

Re: Win32::OLE - Excel chart location

by bmann (Priest)
on Oct 08, 2007 at 20:16 UTC ( #643554=note: print w/ replies, xml ) Need Help??


in reply to Win32::OLE - Excel chart location

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;
You can also move a chart relative amounts with IncrementLeft and IncrementTop.


Comment on Re: Win32::OLE - Excel chart location
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://643554]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (14)
As of 2014-04-18 13:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (468 votes), past polls