Propriedade TextRange2.BoundHeight (Office)

Obtém a altura, em pontos, da caixa delimitadora de texto para o texto especificado. Somente leitura.

Sintaxe

expressão. BoundHeight

expressão Uma expressão que devolve um objeto TextRange2 .

Valor de retorno

Único

Comentários

A caixa delimitadora de texto não é igual ao objeto TextFrame . Objeto TextFrame representa o contêiner no qual o texto pode residir. A caixa delimitadora de texto representa perímetro imediatamente ao redor do texto.

Exemplo

Este exemplo adiciona um retângulo arrendodado ao slide um com as mesmas dimensões da caixa de limite de texto em uma apresentação do PowerPoint.

With ActivePresentation.Slides(1).Shapes(1) 
 Set txb = .TextFrame.Text 
 Set roundRect = .AddShape(ppShapeRoundRect, _ 
 txb.BoundLeft, txb.BoundTop, txb.BoundWidth, txb.BoundHeight) 
 roundRect.Fill.Transparency = 0.25 
End With 

Confira também

• Membros do objeto TextRange2

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.