Clase SparklineGroups (Excel VBA)

La clase SparklineGroups representa una colección de grupos de minigráficos. Para usar una variable de clase SparklineGroups, primero debe ser instanciado, por ejemplo

Dim sgs as SparklineGroups
Set sgs = ActiveCell.SparklineGroups

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos SparklineGroups en una colección.

Dim sprlng As SparklineGroup
For Each sprlng In ActiveCell.SparklineGroups
	
Next sprlng

Add

Crea un nuevo grupo de minigráficos y devuelve un objeto SparklineGroup .

Add (Type, SourceData)

Range("$A$1:$A$4").SparklineGroups.Add Type:=xlSparkColumn, SourceData:= _ 
 "Sheet2!B1:E4"

Arguments

Estos son los argumentos con nombre :

Type (XlSparkType) - Tipo de minigráfico.

Posibles valores de retorno son xlSparkColumn - Minigráfico de columnas, xlSparkColumnStacked100 - Minigráfico de ganancia o pérdida, xlSparkLine - Minigráfico de líneas.

SourceData (String) - Representa el rango que se debe usar para crear el minigráfico.

Clear

Borra los minigráficos seleccionados.

ActiveCell.SparklineGroups.Clear

ClearGroups

Borra los grupos de minigráficos seleccionados.

ActiveCell.SparklineGroups.ClearGroups

Count

Devuelve el número de grupos de minigráficos en el objeto de intervalo asociado. Solo lectura.

Dim lngCount As Long
lngCount = ActiveCell.SparklineGroups.Count

Group

Agrupa los minigráficos seleccionados.

Group (Location)

Location: La ubicación de la primera celda en el grupo.

Range("A1:A4").SparklineGroups.Group Location:=Range("A1")

Item

Devuelve un objeto SparklineGroup de una colección. Solo lectura.

Item (Index)

Index: Especifica la posición de un elemento en la colección.

Dim sprlngItem As SparklineGroup
Set sprlngItem = ActiveCell.SparklineGroups(Index:=1)

Ungroup

Desagrupa los minigráficos en el grupo de minigráficos seleccionado.

Range("A1:A4").SparklineGroups.Ungroup