Window.GetPoint (Word)

Devuelve las coordenadas de pantalla del intervalo o forma que se especifique.

Si en la pantalla no se puede ver la totalidad del intervalo o forma, se produce un error.

GetPoint (ScreenPixelsLeft, ScreenPixelsTop, ScreenPixelsWidth, ScreenPixelsHeight, obj)

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

Arguments

Estos son los argumentos con nombre :

ScreenPixelsLeft (Long) - Nombre de la variable para la cual Microsoft Word debe devolver el valor correspondiente al borde izquierdo del objeto.

ScreenPixelsTop (Long) - Nombre de la variable para la cual Microsoft Word debe devolver el valor correspondiente al borde superior del objeto.

ScreenPixelsWidth (Long) - Nombre de la variable para la cual Word debe devolver el valor correspondiente al ancho del objeto.

ScreenPixelsHeight (Long) - Nombre de la variable para la cual Word debe devolver el valor correspondiente al alto del objeto.

obj (Shape) - Un objeto Range o Shape.