Propriedade Application.ColorSchemes (Publisher)

Retorna uma coleção ColorSchemes que representa os esquemas de cores disponíveis.

Sintaxe

expressão. ColorSchemes

expressão Uma variável que representa um Aplicativo objeto.

Valor de retorno

ColorSchemes

Exemplo

O exemplo a seguir circula a coleção ColorSchemes e exibe o nome de cada esquema de cor e o valor RGB da cor de hiperlinks visitados em cada esquema.

Dim cscLoop As ColorScheme 
Dim cscAll As ColorSchemes 
 
Set cscAll = Application.ColorSchemes 
 
For Each cscLoop In cscAll 
 With cscLoop 
 Debug.Print "Color scheme: " & .Name _ 
 & " / Followed hyperlink color: " _ 
 & .Colors(ColorIndex:=pbSchemeColorFollowedHyperlink).RGB 
 End With 
Next cscLoop

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.