[Previo por Fecha] [Siguiente por Fecha] [Previo por Hilo] [Siguiente por Hilo]
[Hilos de Discusión] [Fecha] [Tema] [Autor]Hola, bueno logro colocalr datos en un nuevo libro de excel pero no
encuentro como cargarle valores al grafico me arrojo un error y no lo he
podido sacar.........:-(, agradecería cualquier ayuda
<?php
print "Hi";
#Instantiate the spreadsheet component.
$ex = new COM("Excel.sheet") or Die ("Did not connect");
$exapp = new COM("Excel.application") or Die ("Did not connect");
#Get the application name and version
print "Application name:{$ex->Application->value}" ;
print "Loaded version: {$ex->Application->version}";
$wkb=$exapp->Workbooks->add();
$wkb = $ex->Application->ActiveWorkbook or Die ("Did not open workbook");
print "we opened workbook";
$ex->Application->Visible = 1; #Make Excel visible.
print "we made excell visible";
$sheets = $wkb->Worksheets(1); #Select the sheet
print "selected a sheet";
$sheets->activate; #Activate it
print "activated sheet";
$sheets->name="Report First page";
print "We set a name to the sheet: $sheets->name";
# fills a columns
$maxi=20;
for ($i=1;$i<$maxi;$i++) {
$cell = $sheets->Cells($i,5) ; #Select the cell (Row Column number)
$cell->activate; #Activate the cell
$cell->value = $i*$i; #Change it to 15000
}
$ch = $sheets->chartobjects->add(50, 40, 400, 100); # make a chartobject
$chartje = $ch->chart; # place a chart in the chart object
$chartje->activate; #activate chartobject
$chartje->ChartType=63;
$selected = $sheets->range("E1:E$maxi"); # set the data the chart uses
$chartje->setsourcedata($selected); # set the data the chart uses
print "set the data the chart uses ";
//unset($exapp);
?>
Lista de correo linux en linux net mx
Preguntas linux-owner en linux net mx
http://www.linux.net.mx/