Propriedade Application.SmartArtColors (Word)
Retorna um objeto SmartArtColors de que representa o conjunto de estilos de cores que estão atualmente carregados no aplicativo. Somente leitura.
Sintaxe
expression. SmartArtColors
Expressão Uma expressão que retorna um objeto 'Application'.
Comentários
O conjunto de cores representado pela propriedade SmartArtColors corresponde aos estilos de cores disponíveis no botão Alterar Cores na guia Design na guia contextual Ferramentas SmartArt no Word.
Exemplo
O exemplo de código a seguir adiciona um elemento de gráfico SmartArt ao documento ativo e define a cor do gráfico SmartArt como "Contorno Escuro 2".
Dim myShape As Shape
Dim mySmartArt As SmartArt
Set myShape = ActiveDocument.Shapes.AddSmartArt(Application.SmartArtLayouts(1), 50, 50, 200, 200)
Set mySmartArt = myShape.SmartArt
mySmartArt.Color = Application.SmartArtColors(2)
Confira também
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.