Objeto ColorFormat (PowerPoint)

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 como um valor vermelho-verde-azul explícito (usando a propriedade RGB ) ou para uma cor no tema (usando o [ObjectThemeColor]) ou o esquema de cores herdado pré-Office 2007 (usando a propriedade SchemeColor ).

Comentários

Use uma das propriedades listadas na tabela a seguir para retornar um objeto ColorFormat.

Use esta propriedade	Com este objeto	Para retornar um objeto ColorFormat que represente isto
DimColor	AnimationSettings	Cor usada para objetos esmaecidos
BackColor	FillFormat	Cor de preenchimento de plano de fundo (usada em um preenchimento sombreado ou padronizado)
ForeColor	FillFormat	Cor de preenchimento de primeiro plano (a cor de preenchimento de um preenchimento sólido)
Cor	Font	Cor de marcador ou caractere
BackColor	LineFormat	Cor da linha de plano de fundo (usada em uma linha padronizada)
ForeColor	LineFormat	Cor da linha de primeiro plano (ou simplesmente a cor da linha em uma linha sólida)
ForeColor	ShadowFormat	Cor da sombra
PointerColor	SlideShowSettings	Cor do ponteiro padrão para uma apresentação
PointerColor	SlideShowView	Cor temporária do ponteiro para um modo de uma apresentação de slides
ExtrusionColor	ThreeDFormat	Cor dos lados de um objeto extrudado

Exemplo

Use a propriedade SchemeColor para definir a cor de um elemento de slide com uma das cores do esquema de cores padrão. O exemplo a seguir define a cor do texto da forma um do slide dois da apresentação ativa com a cor de título do esquema de cores padrão.

ActivePresentation.Slides(2).Shapes(1).TextFrame.TextRange.Font.Color.SchemeColor = ppTitle

Use a propriedade RGB para definir uma cor com um valor vermelho-verde-azul explícito. O exemplo a seguir adiciona um retângulo a myDocument e define a cor de primeiro plano, a cor de plano de fundo e o gradiente para o preenchimento do retângulo.

Set myDocument = ActivePresentation.Slides(1) 
With myDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 90, 50).Fill 
    .ForeColor.RGB = RGB(128, 0, 0) 
    .BackColor.RGB = RGB(170, 170, 170) 
    .TwoColorGradient msoGradientHorizontal, 1 
End With

Confira também

Referência de modelo de objeto do PowerPoint

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.