Continúo con los gráficos.
Para la hoja en la que se va a ubicar el gráfico utilizo el siguiente código:
Código: Seleccionar todo
' Posición del gráfico
pos_size.X = 0
pos_size.Y = 0
pos_size.Width = 26000
pos_size.Height = 14000
' Características del gráfico
address.Sheet = "Graficos" ' Se redefine la hoja para poder ubicar el gráfico
data.Sheet = util.getSheet(address)
data.Name = "Grafico01"
data.Type = "XYDiagram"
data.PosSize = pos_size
data.Series = series
'----------------------------------------------------------------------------------------------
Temp= "Caso A: Hoja del Gráfico como Texto"
properties = Array( _
Array("Title", Temp), _
Array("HasLegend", True), _
)
data.Properties = properties
'----------------------------------------------------------------------------------------------
chart = util.chartAdd(data)
Intento identificarlo por índice, cambiando "Graficos" por 3
Código: Seleccionar todo
' Características del gráfico
address.Sheet = 3 ' Se redefine la hoja para poder ubicar el gráfico
data.Sheet = util.getSheet(address) ' Aqui da error cuando la hoja se pone como índice
data.Name = "Grafico01"
data.Type = "XYDiagram"
data.PosSize = pos_size
data.Series = series
'----------------------------------------------------------------------------------------------
Temp= "Caso B: Hoja del Gráfico como Indice"
properties = Array( _
Array("Title", Temp), _
Array("HasLegend", True), _
)
data.Properties = properties
'----------------------------------------------------------------------------------------------
chart = util.chartAdd(data)
Muchas gracias a todos, que paseis buena noche y mis mejores deseos para el 2016