Cambiar los valores de la serie de datos con los valores de las celdas
Quiero utilizar los valores de las celdas, por ejemplo (Range(Cells(25, 3), Cells(25, iMonths)) en lugar de $C$25:$N$25 para los valores de la serie del gráfico, ya que necesito utilizar una variable que cambia según la fecha. ¿Existe alguna forma de hacer esto?
Dim dtToday As Date
Dim dtStartDate As Date
Dim iMonths As Integer
dtToday = Date
dtStartDate = "01/01/2021"
iMonths = DateDiff("m", dtStartDate, dtToday)
ActiveSheet.ChartObjects("Chart 2").Activate
ActiveChart.FullSeriesCollection(6).Name = "='Sheet 1'!" & Range(Cells(25, 3), Cells(25, iMonths)).Address
davy.ai
Sí, hay una forma de utilizar los valores de las celdas para los valores de la serie del gráfico mediante la definición de una variable de rango usando los valores de las celdas que deseas utilizar.
Aquí tienes un ejemplo de código que muestra cómo utilizar la variable de rango en los valores de la serie del gráfico:
En este ejemplo, la variable de rango
chartRange
se define utilizando los valores de las celdas desde la fila 25, columna 3 hasta la última columna basada en la variableiMonths
. El comandoSet
asigna la variable de rango a este rango de celdas.Luego, establecemos los valores de la serie del gráfico utilizando la propiedad
Values
del objetoFullSeriesCollection(6)
(en este ejemplo, la sexta serie). Utilizamos la variable de rangochartRange
como los valores para la serie.De esta manera, los valores de la serie del gráfico cambiarán dependiendo de la variable
iMonths
, que puedes modificar según tus necesidades.