Classe ColorFormat (PowerPoint VBA)

A classe ColorFormat representa a cor de um objeto de uma cor, a cor de primeiro plano ou plano de fundo de um objeto com um preenchimento gradual ou padronizado ou a cor do ponteiro. Você pode definir cores para um valor vermelho-verde-azul explícito (usando a propriedade RGB ) ou para uma cor no esquema de cores (usando a propriedade SchemeColor ).

Set

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

Dim cft as ColorFormat
Set cft = ActivePresentation.SlideShowSettings.PointerColor

Os procedimentos a seguir podem ser usados para definir variáveis do tipo ColorFormat: AnimationSettings.DimColor, ColorEffect.By, ColorEffect.From, ColorEffect.To, EffectInformation.Dim, EffectParameters.Color2, FillFormat.BackColor, FillFormat.ForeColor, Font.Color, Guide.Color, LineFormat.BackColor, LineFormat.ForeColor, ShadowFormat.ForeColor, SlideShowSettings.PointerColor, SlideShowView.PointerColor, ThreeDFormat.ContourColor e ThreeDFormat.ExtrusionColor

Brightness

Retorna ou define o brilho da imagem especificada ou objeto OLE. O valor dessa propriedade deve ser um número de 0,0 mais esmaecido a 1,0 (mais brilhante). Leitura/gravação única.

ActivePresentation.SlideShowSettings.PointerColor.Brightness = 0.3

ObjectThemeColor

Retorna ou define a cor do tema do objeto ColorFormat especificado. Leitura/gravação.

O valor da propriedade ObjectThemeColor pode ser uma destas constantes MsoThemeColorIndex .

ActivePresentation.SlideShowSettings.PointerColor.ObjectThemeColor = msoThemeColorMixed

Parent

Retorna o objeto parente para o objeto especificado.

RGB

Retorna ou define o valor vermelho-verde-azul RGB da cor especificada. Leitura/gravação.

ActivePresentation.SlideShowSettings.PointerColor.RGB =  RGB(128, 128, 0)

SchemeColor

Retorna ou define a cor do esquema de cores aplicado que está associada ao objeto especificado. Leitura/gravação.

Os valores possíveis são ppAccent1 - Accent1Accent1, ppAccent2 - Accent2Accent2, ppAccent3 - Accent3Accent3, ppBackground - BackgroundBackground, ppFill - Preenchimento, ppForeground - Primeiro plano, ppNotSchemeColor - Sem esquema de cores, ppSchemeColorMixed - Esquema de cores misto, ppShadow - Sombra, ppTitle - Título.

O valor da propriedade SchemeColor pode ser uma destas constantes PpColorSchemeIndex .

ActivePresentation.SlideShowSettings.PointerColor.SchemeColor = RGB(0,0,255)'blue

TintAndShade

Define ou retorna a luminosidade ou escurecimento da cor de uma forma especificada. Leitura/gravação.

Você pode inserir um valor de-1 (mais escuro) até 1 (mais claro) para a propriedade TintAndShade , 0 (zero) é neutro.

ActivePresentation.SlideShowSettings.PointerColor.TintAndShade =

Type

Representa o tipo de cor. Somente leitura.

O valor da propriedade Type pode ser uma destas constantes MsoColorType .

Dim mctType As Office.MsoColorType
mctType = ActivePresentation.SlideShowSettings.PointerColor.Type