Classe RGBColor (PowerPoint VBA)

A classe RGBColor representa uma única cor em um esquema de cores.

Set

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

Dim rgb as RGBColor
Set rgb = ActivePresentation.ColorSchemes(1).Colors(SchemeColor:=ppAccent1)

As variáveis ​​de classe RGBColor podem ser definidas usando o procedimento ColorScheme.Colors.

Parent

Retorna o objeto parente para o objeto especificado.

RGB

Retorna ou define o valor de RGB de vermelho-verde-azul de um esquema de cores especificado ou cores extras quando usado com uma constante PpColorSchemeIndex. Leitura/gravação.

Use o método Colors para retornar um objeto RGBColor. O valor da propriedade RGB pode ser uma destas constantes PpColorSchemeIndex.

Set myDocument = ActivePresentation.Slides(1)
c = myDocument.Shapes(1).Fill.ForeColor.RGB
redComponent = c Mod 256
greenComponent = c \ 256 Mod 256
blueComponent = c \ 65536 Mod 256
MsgBox "RGB components: " & redComponent & _
    ", " & greenComponent & ", " & blueComponent