Hi...

I have this code

use Win32::OLE;
my ($t_row, $t_col) = (4,3);
my $word = Win32::OLE->CreateObject("Word.Application");
$word->{Visible} = 1;
my $doc = $word->Documents->Add;
my $table = $doc->Tables->Add($word->Selection->Range,$t_row, $t_col);
$table->Select();
$table->AutoFormat(4,1,1,0,1,1,1,1,1,1);
$word->Selection->MoveUp(5,4);
$table->Cell(1,1)->Range->{Text} = "Blue";
$table->Cell(1,2)->Range->{Text} = "Red";
$table->Cell(1,3)->Range->{Text} = "Green";
$table->Cell(3,1)->Range->{Text} = "Other Colors";
$table->Rows->{HeadingFormat} = -1;

Well My question are:

Exist a method to merge cells? for example I want to merge Cell(3,1) (3,2)
(3,3)
Exist a method to put all the table visible?
I want my table in this way but i dont know what kind of methods are
available in the Win32::Ole... Existe some kind of web or documentation to
search this methods?

--------------------------------------------
|  Blue    |      Red   |    green   |
---------------------------------------------
|_______|_________|_______|
|*Other colors *_____________|
|_________________________|

Thanks so much

Reply via email to