Propriedade Application.SmartArtLayouts (Word)

Retorna um objeto SmartArtLayouts que representa o conjunto de layouts SmartArt que estão atualmente carregados no aplicativo. Somente leitura.

Sintaxe

expression. SmartArtLayouts

Expressão Uma expressão que retorna um objeto 'Application'.

Comentários

O conjunto de layouts representado pela propriedade SmartArtLayouts corresponde aos layouts disponíveis no grupo Layouts 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 o layout do gráfico SmartArt como "Lista Agrupada".

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.Layout = Application.SmartArtLayouts(15)

Confira também

Objeto de Aplicativo

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.