Compartilhar via


Método Shapes.AddLabel (Excel)

Cria um rótulo. Retorna um objeto Shape representando o novo rótulo.

Sintaxe

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

Valor de retorno

Formato

Exemplo

Este exemplo adiciona um rótulo vertical que contém o rótulo de teste de texto ao myDocument.

Set myDocument = Worksheets(1) 
myDocument.Shapes.AddLabel(msoTextOrientationVertical, _ 
    100, 100, 60, 150) _ 
    .TextFrame.Characters.Text = "Test Label"

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.