2011-01-05 10 views
-3

Wenn jemand die Lösung dieses Problems kennt bitteWie schreiben fusionieren Zelle und unmerge Zelle zusammen auf einer einzigen Zeile des excell Blattes

use strict 
use Spreadsheet::WriteExcel; 
my $Workbook = Spreadsheet::WriteExcel->new('cw.xls'); 
my $Worksheet1 = $Workbook->add_worksheet('MRD'); 

# Here $Groups[0] is unmerged cell 

$Worksheet1->write(10,0, **$Groups[0]**,$Bg_Color); 
my $i=1;  
foreach my $Grp(@Groups){ 
    my $Cell_Position = "$A2Z_Array[$i]10:$A2Z_Array[$i+1]10"; 
    $Worksheet1->merge_range($Cell_Position,**$Grp**,$Bg_Color_1); 
    # Here $Grp is merged cell 
    $i+=2; 
} 
+0

können Sie das Stück Code zeigen, was Sie bisher getan haben. –

+0

Ich habe keine Ahnung, was dieser Code ohne Kontext tut. Welcher Typ ist '$ Worksheet1'? Wie interagieren Sie mit Excel? –

+0

ein mehr erklärender Fragetitel wäre SO Benutzern auch nützlich! sieht so aus, als ob das Poster Spreadsheet :: WriteExcel verwendet - http://search.cpan.org/dist/Spreadsheet-WriteExcel/ – plusplus

Antwort

3

antwortet Es scheint, dass Sie die Perl-Modul Spreadsheet::WriteExcel verwenden.

Es gibt nicht genug Kontext in Ihrer Frage, um herauszufinden, was falsch ist, aber Sie könnten beginnen, indem Sie auf die merged cells examples in den Tabellen Spreadsheet :: WriteExcel schauen.

Verwandte Themen