Classe Icon (Excel VBA)

A classe Icon representa um único ícone em um conjunto de ícones usado em uma regra de formatação condicional.

Set

Para usar uma variável de classe Icon, ela primeiro precisa ser instanciada por exemplo

Dim icn as Icon
Set icn = ActiveWorkbook.IconSets(1)(Index:=1)

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo Icon: IconSet.Item, Parent, IconSetCondition.IconSet e IconSets.Item

For Each

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

Dim icnParent As Icon
For Each icnParent In ActiveWorkbook.IconSets.Parent
	
Next icnParent

Index

Retorna um valor Long que especifica o número de índice do objeto Icon no objeto IconSet. Somente leitura.

Dim lngIndex As Long
lngIndex = ActiveWorkbook.IconSets(1)(1).Index

Parent

Retorna o objeto pai do objeto especificado. Somente leitura.

IconSet.Count

Retorna um valor Long que especifica o número de ícones no conjunto de ícones. Somente leitura.

Dim lngCount As Long
lngCount = ActiveWorkbook.IconSets(1).Count

IconSet.ID

Retorna uma das constantes da enumeração XlIconSet , que especifica o nome do conjunto de ícones usado em uma regra de formatação condicional de conjunto de ícones.

Os valores possíveis são xl3Arrows - 3 Arrows3 Arrows, xl3ArrowsGray - 3 Setas Cinzas, xl3Flags - 3 Flags3 Flags, xl3Signs - 3 Signs3 Signs, xl3Stars, xl3Symbols - 3 Symbols3 Symbols, xl3Symbols2, xl3TrafficLights1 - 3 Traffic Lights 13 Traffic Lights 1, xl3TrafficLights2 - 3 Traffic Lights 23 Traffic Lights 2, xl3Triangles, xl4Arrows - 4 Arrows4 Arrows, xl4ArrowsGray - 4 Setas Cinzas, xl4CRV - 4 CRV4 CRV, xl4RedToBlack - 4 Vermelho para Preto, xl4TrafficLights - 4 Traffic Lights4 Traffic Lights, xl5Arrows - 5 Arrows5 Arrows, xl5ArrowsGray - 5 Setas Cinzas, xl5Boxes, xl5CRV - 5 CRV5 CRV, xl5Quarters - 5 Quarters5 Quarters, xlCustomSet.
Dim xisID As XlIconSet
xisID = ActiveWorkbook.IconSets(1).ID

IconSet.Item

Retorna um objeto Icon que representa um único ícone de um conjunto de ícones. Somente leitura.

O valor do parâmetro Index não pode ser maior que o número de ícones em um conjunto de ícones. Para localizar o número total de ícones em um conjunto de ícones, use a propriedade Count .

Sintaxe : expression.Item (Index)

Index: O número de índice do objeto Icon.

Dim icnItem As Icon
Set icnItem = ActiveWorkbook.IconSets(1)(Index:=1)

IconSet.Parent

Retorna o objeto pai do objeto especificado. Somente leitura.