Chart.SetDefaultChart (PowerPoint)

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.

Dim strName As String: strName = 
ActivePresentation.Slides(1).Shapes(1).Chart.SetDefaultChart Name:=strName