Compartilhar via

Shapes.AddTextbox method (Publisher) (Método Shapes.AddTextbox [Publisher])

Adiciona um novo objeto Forma que representa uma caixa de texto à coleção Formas especificada.

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 PbTextOrientation A orientação da caixa de texto.
Left Obrigatório Variant A posição da borda esquerda da forma que representa a caixa de texto.
Top Obrigatório Variant A posição da borda superior da forma que representa a caixa de texto.
Width Obrigatório Variant A largura da forma que representa a caixa de texto.
Height Obrigatório Variant A altura da forma que representa a caixa de texto.

Valor de retorno

Forma

Comentários

Para os parâmetros Esquerda, Superior, Largura e Altura , os valores numéricos são avaliados em pontos; As cadeias de carateres podem estar em todas as unidades suportadas pelo Microsoft Publisher (por exemplo, "2,5 pol").

O parâmetro Orientação pode ser uma das constantes PbTextOrientation declaradas na biblioteca de tipos do Microsoft Publisher e apresentadas na tabela seguinte.

Constante Descrição
pbTextOrientationHorizontal Uma caixa de texto horizontal para idiomas com escrita da esquerda para a direita.
pbTextOrientationRightToLeft Uma caixa de texto horizontal para idiomas com escrita da direita para a esquerda. Esse valor não será efetivado se um idioma com escrita da direita para a esquerda não estiver selecionado.
pbTextOrientationVerticalEastAsia Uma caixa de texto vertical para idiomas do leste asiático. Se for selecionado um idioma que não seja do leste asiático, o texto aparecerá girado 90 graus à direita.

Exemplo

O exemplo a seguir adiciona uma nova caixa de texto à primeira página da publicação ativa.

Dim shpTextBox As Shape 
 
Set shpTextBox = ActiveDocument.Pages(1).Shapes.AddTextBox _ 
 (Orientation:=pbTextOrientationHorizontal, _ 
 Left:=144, Top:=144, _ 
 Width:=72, Height:=18)

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.

  • Last updated on