Método Shape.GetHeight (Publisher)

Retorna a altura da forma ou do intervalo de formas como um Single nas unidades especificadas.

Sintaxe

expressão. GetHeight (Unidade)

Expressão Uma variável que representa um objeto Shape .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Unit Obrigatório PbUnitType A unidade na qual a altura deve ser retornada. Pode ser uma das constantes PbUnitType declaradas na biblioteca de tipos do Microsoft Publisher.

Valor de retorno

Único

Comentários

Use o método GetWidth para retornar a largura de uma forma ou de um intervalo de formas.

Exemplo

O exemplo a seguir exibe a altura e a largura em polegadas (até o centésimo mais próximo) do intervalo de formas que abrange todas as formas da primeira página da publicação ativa.

With ActiveDocument.Pages(1).Shapes.Range 
 MsgBox "Height of all shapes: " _ 
 & Format(.GetHeight(Unit:=pbUnitInch), "0.00") _ 
 & " in" & vbCr _ 
 & "Width of all shapes: " _ 
 & Format(.GetWidth(Unit:=pbUnitInch), "0.00") _ 
 & " in" 
End With 

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.