Shapes.AddSmartArt (Word)

Insere o elemento gráfico SmartArt especificado no documento ativo.

AddSmartArt (Layout, Left, Top, Width, Height, Anchor)

Dim shpAddSmartArt As Shape
Set shpAddSmartArt = Selection.HeaderFooter.Shapes.AddSmartArt(Layout:=)

Arguments

O seguinte argumento é necessário

Layout (Office.SmartArtLayout) - Um objeto SmartArtLayout que especifica o layout para o elemento gráfico SmartArt.

Optional arguments

Os seguintes argumentos são opcionais

Left (Long) - A distância, em pontos, da borda esquerda do slide até a borda esquerda do elemento gráfico SmartArt.

Top (Long) - A distância, em pontos, da borda superior do slide até a borda superior do elemento gráfico SmartArt.

Width (Long) - A largura do gráfico SmartArt.

Height (Long) - A altura do gráfico SmartArt.

Anchor (Range) - Um objeto Range que representa o texto ao qual o elemento gráfico SmartArt está acoplado. Se Anchor for especificado, a âncora será posicionada no início do primeiro parágrafo no intervalo de ancoragem. Se esse argumento for omitido, o intervalo de ancoragem é selecionado automaticamente e o elemento gráfico SmartArt é posicionado em relação às bordas superior e esquerdas da página.