Window.GetPoint (Word)
Renvoie les coordonnées à l'écran de la plage ou de la forme spécifiée.
Si la plage ou la forme n'est pas entièrement visible à l'écran, une erreur se produit.
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
Les arguments nommés :
ScreenPixelsLeft (Long) - Nom de la variable à laquelle vous souhaitez que Microsoft Word renvoie la valeur affectée au bord gauche de l'objet.
ScreenPixelsTop (Long) - Nom de la variable à laquelle vous souhaitez que Microsoft Word renvoie la valeur affectée au bord supérieur de l'objet.
ScreenPixelsWidth (Long) - Nom de la variable à laquelle vous souhaitez que Microsoft Word renvoie la valeur affectée à la largeur de l'objet.
ScreenPixelsHeight (Long) - Nom de la variable à laquelle vous souhaitez que Microsoft Word renvoie la valeur affectée à la hauteur de l'objet.
obj (Shape) - Un objet Range ou Shape.