Clase SeriesCollection (Word VBA)
La clase SeriesCollection representa una colección de todos los objetos Series en el gráfico o grupo de gráficos especificado. Para usar una variable de clase SeriesCollection, primero debe ser instanciado, por ejemplo
Dim scn as SeriesCollection
Set scn = ActiveDocument.Background.Chart.SeriesCollection()
Add
Agrega una o más series nuevas a la colección.
Este método no devuelve realmente un objeto Series, como se indica en el Examinador de objetos.
Add (Source, Rowcol, SeriesLabels, CategoryLabels, Replace)
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.SeriesCollection.Add _
Source:="Sheet1!B1:B10"
End If
End With
Arguments
Un argumento con nombre
Source (Source) - Datos nuevos a modo de representación de cadena de un rango incluido en la propiedad Workbook del objeto ChartData para el gráfico.
Optional arguments
Los siguientes argumentos son opcionales
Rowcol (XlRowCol) - Uno de los valores de la enumeración que especifica si los nuevos valores están en las filas o columnas del rango indicado.
Posibles valores de retorno son xlColumns - La serie de datos está en una fila, xlRows - La serie de datos está en una columna.
SeriesLabels (Boolean) - True si la primera fila o columna contiene el nombre de la serie de datos.
CategoryLabels (Boolean) - True si la primera fila o columna contiene el nombre de los rótulos de categorías.
Replace (Boolean) - Si CategoryLabels es True y Replace es True, las categorías especificadas reemplazarán las categorías que existen actualmente para la serie.
Count
Devuelve el número de objetos de la colección.
Dim lngCount As Long
lngCount = ActiveDocument.Background.Chart.SeriesCollection.Count
Extend
Agrega puntos de datos nuevos a una colección de series ya existente.
Este método no está disponible para informes de gráfico dinámico.
Extend (Source, Rowcol, CategoryLabels)
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.SeriesCollection.Extend _
Source:="B1:B6"
End If
End With
Arguments
Un argumento con nombre
Source (Source) - Los nuevos datos que se va a agregar al objeto SeriesCollection, representados como una referencia de rango de estilo A1.
Optional arguments
Los siguientes argumentos son opcionales
Rowcol (XlRowCol) - Uno de los valores de la enumeración XlRowCol que especifica si los nuevos valores están en las filas o columnas del origen del rango determinado.
Posibles valores de retorno son xlColumns - La serie de datos está en una fila, xlRows - La serie de datos está en una columna.
CategoryLabels (Boolean) - True para que la primera fila o columna contenga el nombre de los rótulos de categorías.
Item
Devuelve un solo objeto de una colección.
Item (Index)
Index: Número de índice o nombre del objeto.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
With .Chart.SeriesCollection.Item(1).Trendlines.Item(1)
.Forward = 5
.Backward = .5
End With
End If
End With
NewSeries
Crea una nueva serie.
Este método no está disponible para gráficos dinámicos.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
Set ns = .Chart.SeriesCollection.NewSeries
End If
End With