Propriedade Application.SmartArtQuickStyles (Word)
Retorna um objeto SmartArtQuickStyles que representa o conjunto de estilos que estão atualmente carregados no aplicativo. Somente leitura.
Sintaxe
expression. SmartArtQuickStyles
Expressão Uma expressão que retorna um objeto 'Application'.
Comentários
O conjunto de estilos representado pela propriedade SmartArtQuickStyles corresponde aos estilos disponíveis no grupo estilos na guia Design na guia contextual Ferramentas de SmartArt no Word.
Exemplo
O exemplo de código a seguir adiciona um elemento de gráfico SmartArt ao documento ativo e define o estilo do gráfico SmartArt como "Polido".
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.QuickStyle = Application.SmartArtQuickStyles.Item(6)
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.