Actualizar rango de un grafico con vba

05/04/2005 - 19:31 por F | Informe spam

Hola
Tengo un gracifo con un serie que tiene una serie de valores cada uno es
una fila por ejemplo (esto varia) de A1 a A10

si ahora añado un nuevo dato (fila) en A11, como hago para que el grafico
valla de A1 a A11,

se que el dato se puede establecer con
ActiveChart.SeriesCollection(1).Values, o algo asi, pero no encuentro la
manera de hacerlo.

gracias

Siga el debate

1 respuesta

Tengo una respuesta

DRAGON AGE™: INQUISITION – Matadragones

Leer las respuestas

#1 KL

06/04/2005 - 03:13 | Informe spam

Hola F,

Prueba poner el siguiente codigo dentro del modulo VBA de la hoja que
contiene los valores. Supongo (por el ejemplo de codigo que expones) que el
grafico es una hoja de grafico. Si es necesario, cambia el nombre o indice
del grafico en el codigo.

Saludos,
KL

'--Inicio Codigo
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
Set rng = Me.Range(Me.Cells(2, "A"), _
Me.Cells(Me.Range("A65536").End(xlUp).Row, "A"))
If Not rng Is Nothing Then _
Charts(1).SeriesCollection(1).Values = rng
End Sub
'--Fin Codigo

Leer las otras respuestas

Preguntas similares

Busqueda sugerida :