Freigeben über


Window.RangeFromPoint-Methode (Excel)

Gibt das Shape- oder Range-Objekt zurück, das an dem angegebenen Bildschirmkoordinatenpaar positioniert ist. Wenn sich an den angegebenen Koordinaten kein Shape befindet, gibt diese Methode Nothing zurück.

Syntax

Ausdruck. RangeFromPoint (x, y)

Ausdruck Eine Variable, die ein Window-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
x Erforderlich Long Der Wert (in Pixel), der die horizontale Entfernung vom linken Bildschirmrand darstellt (beginnend von oben).
y Erforderlich Long Der Wert (in Pixel), der die vertikale Entfernung vom oberen Bildschirmrand darstellt (beginnend von links).

Rückgabewert

Objekt

Beispiel

In diesem Beispiel wird der alternative Text für die Form unmittelbar unter dem Mauszeiger zurückgegeben, falls es sich bei der Form um ein Diagramm, eine Linie oder ein Bild handelt.

Private Function AltText(ByVal intMouseX As Integer, _ 
 ByVal intMouseY as Integer) As String 
 Set objShape = ActiveWindow.RangeFromPoint _ 
 (x:=intMouseX, y:=intMouseY) 
 If Not objShape Is Nothing Then 
 With objShape 
 Select Case .Type 
 Case msoChart, msoLine, msoPicture: 
 AltText = .AlternativeText 
 Case Else: 
 AltText = "" 
 End Select 
 End With 
 Else 
 AltText = "" 
 End If 
End Function

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.