Shapes.AddLabel method (Excel) (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 da etiqueta relativa ao canto superior esquerdo do documento.
Top	Obrigatório	Single	A posição (em pontos) do canto superior esquerdo da etiqueta 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 uma etiqueta vertical que contém o texto Etiqueta de Teste a 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.