Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna as coordenadas de tela da forma ou intervalo especificado.
Sintaxe
expressão.
GetPoint( _ScreenPixelsLeft_ , _ScreenPixelsTop_ , _ScreenPixelsWidth_ , _ScreenPixelsHeight_ , _obj_ )
expressão Obrigatório. Uma variável que representa um objeto Window.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| ScreenPixelsLeft | Obrigatório | Long | O nome da variável para a qual você deseja que o Microsoft Word retorne o valor referente à borda esquerda do objeto. |
| ScreenPixelsTop | Obrigatório | Long | O nome da variável para a qual você deseja que o Microsoft Word retorne o valor referente à borda superior do objeto. |
| ScreenPixelsWidth | Obrigatório | Long | O nome da variável para a qual você deseja que o Microsoft Word retorne o valor referente à largura do objeto. |
| ScreenPixelsHeight | Obrigatório | Long | O nome da variável para a qual você deseja que o Microsoft Word retorne o valor referente à altura do objeto. |
| obj | Obrigatório | Object | Um objeto Range ou Shape. |
Comentários
Se o intervalo ou forma não estiver totalmente visível na tela, ocorrerá um erro.
Exemplo
Este exemplo examina a seleção atual e retorna suas coordenadas de tela.
Dim pLeft As Long
Dim pTop As Long
Dim pWidth As Long
Dim pHeight As Long
ActiveWindow.GetPoint pLeft, pTop, pWidth, pHeight, _
Selection.Range
MsgBox "Left = " & pLeft & vbLf _
& "Top = " & pTop & vbLf _
& "Width = " & pWidth & vbLf _
& "Height = " & pHeight
Confira também
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.