Compartilhar via


Método Shapes.AddTextbox (Excel)

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

Sintaxe

expressão. AddTextbox (Orientação, Esquerda, Superior, Largura, Altura)

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 da caixa de texto.
Left Obrigatório Single A posição (em pontos) do canto superior esquerdo da caixa de texto em relação ao canto superior esquerdo do documento.
Top Obrigatório Single A posição (em pontos) do canto superior esquerdo da caixa de texto em relação à parte superior do documento.
Width Obrigatório Single A largura da caixa de texto, em pontos.
Height Obrigatório Single A altura da caixa de texto, em pontos.

Valor de retorno

Formato

Exemplo

Este exemplo adiciona uma caixa de texto que contém a caixa de teste de texto ao myDocument.

Set myDocument = Worksheets(1) 
myDocument.Shapes.AddTextbox(msoTextOrientationHorizontal, _ 
    100, 100, 200, 50) _ 
    .TextFrame.Characters.Text = "Test Box"

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.