Compartilhar via


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

Objeto Shapes

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.