Classe SparklineGroups (Excel VBA)

A classe SparklineGroups representa uma coleção de grupos de minigráficos. Para usar uma variável de classe SparklineGroups, ela primeiro precisa ser instanciada por exemplo

Dim sgs as SparklineGroups
Set sgs = ActiveCell.SparklineGroups

For Each

Aqui está um exemplo de processamento dos itens SparklineGroups em uma coleção.

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

Add

Cria um novo grupo de minigráficos e retorna um objeto de grupo de minigráficos.

Add (Type, SourceData)

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

Arguments

O seguinte argumento é opcional

Type (XlSparkType) - O tipo de minigráfico.

Os valores de retorno possíveis são xlSparkColumn - Um minigráfico de colunas, xlSparkColumnStacked100 - Um minigráfico de ganhos/perdas, xlSparkLine - Um minigráfico de linha.

SourceData (String) - Representa o intervalo a ser usado para criar o minigráfico.

Clear

Limpa o minigráfico selecionado.

ActiveCell.SparklineGroups.Clear

ClearGroups

Limpa os grupos de minigráficos selecionados.

ActiveCell.SparklineGroups.ClearGroups

Count

Retorna a contagem de grupos de minigráficos no objeto Range associado. Somente leitura.

Dim lngCount As Long
lngCount = ActiveCell.SparklineGroups.Count

Group

Agrupa os minigráficos selecionados.

Group (Location)

Location: O local da primeira célula no grupo.

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

Item

Retorna um objeto de grupo de minigráfico de uma coleção. Somente leitura.

Item (Index)

Index: Especifica a posição de um elemento na coleção.

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

Ungroup

Desagrupa minigráficos do grupo de minigráficos selecionado.

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