Share via


Método Shapes.AddTextbox (PowerPoint)

Cria uma caixa de texto. Retorna um objeto Shape representando a nova caixa de texto.

Sintaxe

expression. AddTextbox( _Orientation_, _Left_, _Top_, _Width_, _Height_ )

expressão Uma variável que representa um objeto Formas.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Orientation Obrigatório MsoTextOrientation A orientação do texto. Algumas dessas constantes podem não estar disponíveis para você, dependendo do suporte a idioma (inglês americano, por exemplo) que você selecionou ou instalou.
Left Obrigatório Single A posição, medida em pontos, da borda esquerda da caixa de texto em relação à borda esquerda do slide.
Top Obrigatório Single A posição, medida em pontos, da borda superior da caixa de texto em relação à borda superior do slide
Width Obrigatório Single A largura da caixa de texto, medida em pontos.
Height Obrigatório Single A altura da caixa de texto, medida em pontos.

Valor de retorno

Forma

Exemplo

Este exemplo adiciona uma caixa de texto contendo o texto "Test Box" a myDocument.

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _ 
    Left:=100, Top:=100, Width:=200, Height:=50).TextFrame _ 
    .TextRange.Text = "Test Box"

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.