Chart.SetDefaultChart (Word)

Especifica o nome do modelo de gráfico que o Microsoft Word usa ao criar novos gráficos.

SetDefaultChart (Name)

Name: Especifica o nome do modelo de gráfico padrão que o Word usa ao criar novos gráficos. Esse nome pode ser definido como o nome de um modelo de gráfico definido pelo usuário na galeria ou uma constante XlChartGallery especial, xlBuiltIn, para especificar um modelo de gráfico interno.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.SetDefaultChart Name:="Monthly Sales" 
 End If 
End With