Método Shapes.AddTitle (PowerPoint)
Restaura um espaço reservado para título excluído anteriormente a um slide. Retorna um objeto Shape que representa o título restaurado.
Sintaxe
expression. AddTitle
expressão Uma variável que representa um objeto Formas.
Valor de retorno
Forma
Comentários
Esse método causará um erro se você não tiver excluído anteriormente o espaço reservado para título do slide especificado. Use a propriedade HasTitle para determinar se o espaço reservado para título foi excluído.
Exemplo
Este exemplo restaura o espaço reservado de título no primeiro slide, na apresentação ativa, se esse espaço reservado tiver sido excluído. O texto do título restaurado é "Restored title" ("Título restaurado").
With ActivePresentation.Slides(1)
If .Layout <> ppLayoutBlank Then
With .Shapes
If Not .HasTitle Then
.AddTitle.TextFrame.TextRange.Text = "Restored title"
End If
End With
End If
End With
Confira também
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.