Compartilhar via


Método Shape.GetTop (Publisher)

Devolve a distância do limite superior da forma ou do intervalo de formas a partir da margem superior da página mais à esquerda na vista atual como um Único nas unidades especificadas.

Sintaxe

expressão. GetTop (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 distância 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 GetLeft para retornar a distância da margem esquerda de uma forma ou de um intervalo de formas da margem esquerda da página mais à esquerda na exibição atual.

Exemplo

O exemplo seguinte apresenta as distâncias entre as margens esquerda e superior da página mais à esquerda e as margens superiores de um intervalo de formas que consistem em todas as formas na primeira página. A distância é expressa em polegadas (até o centésimo mais próximo).

With ActiveDocument.Pages(1).Shapes.Range 
 MsgBox "Distance from left: " _ 
 & Format(.GetLeft(Unit:=pbUnitInch), "0.00") _ 
 & " in" & vbCr _ 
 & "Distance from top: " _ 
 & Format(.GetTop(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.