Compartilhar via


propriedade ShapeRange.Top (PowerPoint)

Retorna ou define um valor único que representa a distância entre a borda superior da forma mais superior no intervalo da forma até a borda superior do documento. Leitura/gravação.

Sintaxe

expressão. Início

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

Valor de retorno

Único

Exemplo

Este exemplo organiza as janelas um e dois horizontalmente; em outras palavras, cada janela ocupa a metade do espaço vertical disponível e todo o espaço horizontal disponível na área do cliente da janela do aplicativo. Para esse exemplo funcionar, deve haver somente duas janelas de documento abertas.

Windows.Arrange ppArrangeTiled

sngHeight = Windows(1).Height                     ' available height

sngWidth = Windows(1).Width + Windows(2).Width    ' available width

With Windows(1)

    .Width = sngWidth

    .Height = sngHeight / 2

    .Left = 0

End With

With Windows(2)

    .Width = sngWidth

    .Height = sngHeight / 2

    .Top = sngHeight / 2

    .Left = 0

End With

Confira também

Objeto ShapeRange

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.