Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Renvoie les coordonnées à l'écran de la plage ou de la forme spécifiée.
Syntaxe
expression.
GetPoint( _ScreenPixelsLeft_ , _ScreenPixelsTop_ , _ScreenPixelsWidth_ , _ScreenPixelsHeight_ , _obj_ )
expression Obligatoire. Variable qui représente un objet Window.
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| ScreenPixelsLeft | Obligatoire | Entier long | Nom de la variable à laquelle vous souhaitez que Microsoft Word renvoie la valeur affectée au bord gauche de l'objet. |
| ScreenPixelsTop | Obligatoire | Entier long | Nom de la variable à laquelle vous souhaitez que Microsoft Word renvoie la valeur affectée au bord supérieur de l'objet. |
| ScreenPixelsWidth | Obligatoire | Entier long | Nom de la variable à laquelle vous souhaitez que Microsoft Word renvoie la valeur affectée à la largeur de l'objet. |
| ScreenPixelsHeight | Obligatoire | Entier long | Nom de la variable à laquelle vous souhaitez que Microsoft Word renvoie la valeur affectée à la hauteur de l'objet. |
| obj | Obligatoire | Objet | Un objet Range ou Shape. |
Remarques
Si la plage ou la forme n'est pas entièrement visible à l'écran, une erreur se produit.
Exemple
Cet exemple montre comment examiner la sélection active et comment renvoyer ses coordonnées à l'écran.
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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.