I am trying to insert a picture into a worksheet in Excel using Perl the following is the code
I excuted the same code for inserting the picture in a VBA macro and it worked. I am using Excel 2007. I do not know what the issue is I can insert every object except for a picture.
Any one know how to insert the picture in Excel 2007 using Win32::OLE?
I am using Win32::OLE to write a perl script which opens an excel file. That excel file is password protected and everytime i run that script dialog box pops up and I have to click on Read-Only then my script executes. Is there any way I can specify the readonly attribute in my code so i dont have... (0 Replies)
Hi,
I am trying automate couting number of spell and typo errors in MS Word document using perl script.
In perl script, i am using Win32::OLE module of perl to read MS word document.
Can anybody tell me are there any modules available in perl which can be imported into my script to... (0 Replies)
Hello All,
I have executed one script where i am getting this error,what may be the reason.....
please help me out.
OLE exception from Microsoft Excel
Win32::OLE(0.1403) error 0x800a03ec
in METHOD/PROPERTYGET "open" (1 Reply)
Hey guys,
I'm trying to go through my emails in Outlook until I find an email with a certain subject line.
I am able to send emails with no problem, but reading emails and their properties (From, Subject, etc.) is my main problem.
Basically, I don't know where to start and using search engines... (2 Replies)
Hi all,
Is win32::OLE module is applicable in linux system???
from my understanding it is not possible..because we have to use some tools for that..for more info refer this website
http://oclug.on.ca/archives/oclug/2001-July/008100.html (1 Reply)
Hello Gurus,
I am begginer in perl. I would like to ask several questions, some related to perl and its syntax but most will be regarding to WIN32 OLE. My main goal is to develop script that will check word document structure (return some information) and make some changes in this document (if it... (0 Replies)
Hi gurus, i am trying to write simple perl script using win32 ole which will iterate over all M$ word paragraphs (any text that ends with a hard return) and print only those paragraphs that matches the specified condition. The problem is that I need to access font size property. It seems to me that... (0 Replies)
Hi gurus
I am trying to understand some advanced (for me) perl constructions (syntax) following this tutorial I am trying to parse html:
Using Mojo::DOM | Joel Berger
say "div days:";
say $_->text for $dom->find('div.days')->each;
say "\nspan hours:";
say $_->text for... (1 Reply)
Hi,
I have a requirement where I have an excel sheet with the below values
COL1 COL2 COL3
Germany URGENT NORMAL
I want to cut the values of this excel in such a way that I get the values and pass it to an insert statement
update tbfin set... (2 Replies)
Discussion started by: venkidhadha
2 Replies
LEARN ABOUT DEBIAN
excel::writer::xlsx::chart::stock
Excel::Writer::XLSX::Chart::Stock(3pm) User Contributed Perl Documentation Excel::Writer::XLSX::Chart::Stock(3pm)NAME
Stock - A class for writing Excel Stock charts.
SYNOPSIS
To create a simple Excel file with a Stock chart using Excel::Writer::XLSX:
#!/usr/bin/perl -w
use strict;
use Excel::Writer::XLSX;
my $workbook = Excel::Writer::XLSX->new( 'chart.xlsx' );
my $worksheet = $workbook->add_worksheet();
my $chart = $workbook->add_chart( type => 'stock' );
# Add a series for each High-Low-Close.
$chart->add_series( categories => '=Sheet1!$A$2:$A$6', values => '=Sheet1!$B$2:$B$6' );
$chart->add_series( categories => '=Sheet1!$A$2:$A$6', values => '=Sheet1!$C$2:$C$6' );
$chart->add_series( categories => '=Sheet1!$A$2:$A$6', values => '=Sheet1!$D$2:$D$6' );
# Add the worksheet data the chart refers to.
# ... See the full example below.
__END__
DESCRIPTION
This module implements Stock charts for Excel::Writer::XLSX. The chart object is created via the Workbook "add_chart()" method:
my $chart = $workbook->add_chart( type => 'stock' );
Once the object is created it can be configured via the following methods that are common to all chart classes:
$chart->add_series();
$chart->set_x_axis();
$chart->set_y_axis();
$chart->set_title();
These methods are explained in detail in Excel::Writer::XLSX::Chart. Class specific methods or settings, if any, are explained below.
Stock Chart Methods
There aren't currently any stock chart specific methods. See the TODO section of Excel::Writer::XLSX::Chart.
The default Stock chart is an High-Low-Close chart. A series must be added for each of these data sources.
EXAMPLE
Here is a complete example that demonstrates most of the available features when creating a Stock chart.
#!/usr/bin/perl
use strict;
use warnings;
use Excel::Writer::XLSX;
use Excel::Writer::XLSX;
my $workbook = Excel::Writer::XLSX->new( 'chart_stock.xlsx' );
my $worksheet = $workbook->add_worksheet();
my $bold = $workbook->add_format( bold => 1 );
my $date_format = $workbook->add_format( num_format => 'dd/mm/yyyy' );
my $chart = $workbook->add_chart( type => 'stock', embedded => 1 );
# Add the worksheet data that the charts will refer to.
my $headings = [ 'Date', 'High', 'Low', 'Close' ];
my $data = [
[ '2007-01-01T', '2007-01-02T', '2007-01-03T', '2007-01-04T', '2007-01-05T' ],
[ 27.2, 25.03, 19.05, 20.34, 18.5 ],
[ 23.49, 19.55, 15.12, 17.84, 16.34 ],
[ 25.45, 23.05, 17.32, 20.45, 17.34 ],
];
$worksheet->write( 'A1', $headings, $bold );
for my $row ( 0 .. 4 ) {
$worksheet->write_date_time( $row+1, 0, $data->[0]->[$row], $date_format );
$worksheet->write( $row+1, 1, $data->[1]->[$row] );
$worksheet->write( $row+1, 2, $data->[2]->[$row] );
$worksheet->write( $row+1, 3, $data->[3]->[$row] );
}
$worksheet->set_column( 'A:D', 11 );
# Add a series for each of the High-Low-Close columns.
$chart->add_series(
categories => '=Sheet1!$A$2:$A$6',
values => '=Sheet1!$B$2:$B$6',
);
$chart->add_series(
categories => '=Sheet1!$A$2:$A$6',
values => '=Sheet1!$C$2:$C$6',
);
$chart->add_series(
categories => '=Sheet1!$A$2:$A$6',
values => '=Sheet1!$D$2:$D$6',
);
# Add a chart title and some axis labels.
$chart->set_title ( name => 'High-Low-Close', );
$chart->set_x_axis( name => 'Date', );
$chart->set_y_axis( name => 'Share price', );
$worksheet->insert_chart( 'E9', $chart );
__END__
AUTHOR
John McNamara jmcnamara@cpan.org
COPYRIGHT
Copyright MM-MMXII, John McNamara.
All Rights Reserved. This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.
perl v5.10.1 2012-04-02 Excel::Writer::XLSX::Chart::Stock(3pm)