Chart.SaveChartTemplate (Word)
Guarda una plantilla de gráfico personalizada en la lista de plantillas de gráfico disponibles.
De forma predeterminada, este método guarda el gráfico activo en el directorio de plantillas de gráficos del usuario.
SaveChartTemplate (FileName)
FileName: Nombre de la plantilla de gráfico.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.SaveChartTemplate _
FileName:="Presentation Chart"
End If
End With