Anmerkung
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt die Bildschirmkoordinaten des angegebenen Bereichs oder der angegebenen Form zurück.
Syntax
Ausdruck.
GetPoint( _ScreenPixelsLeft_ , _ScreenPixelsTop_ , _ScreenPixelsWidth_ , _ScreenPixelsHeight_ , _obj_ )
expression Erforderlich. Eine Variable, die ein Window-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| ScreenPixelsLeft | Erforderlich | Long | Der Name der Variablen, an die der Wert für den linken Rand des Objekts von Microsoft Word zurückgeben werden soll. |
| ScreenPixelsTop | Erforderlich | Long | Der Name der Variablen, an die der Wert für den oberen Rand des Objekts von Microsoft Word zurückgeben werden soll. |
| ScreenPixelsWidth | Erforderlich | Long | Der Name der Variablen, an die der Wert für die Breite des Objekts von Microsoft Word zurückgeben werden soll. |
| ScreenPixelsHeight | Erforderlich | Long | Der Name der Variablen, an die der Wert für die Höhe des Objekts von Microsoft Word zurückgeben werden soll. |
| Obj | Erforderlich | Objekt | Ein Range oder Shape-Objekt. |
Hinweise
Wenn der gesamte Bereich oder die Form nicht auf dem Bildschirm angezeigt wird, tritt ein Fehler auf.
Beispiel
In diesem Beispiel wird die aktuelle Auswahl überprüft, und die Bildschirmkoordinaten der aktuellen Auswahl werden zurückgegeben.
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
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.