DocumentWindow.RangeFromPoint Method (PowerPoint)
Returns the Shape object that is located at the point specified by the screen position coordinate pair. If no shape is located at the coordinate pair specified, then the method returns Nothing.
Syntax
expression .RangeFromPoint(x, y)
expression A variable that represents a DocumentWindow object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
x |
Required |
Long |
The horizontal distance (in pixels) from the left edge of the screen to the point. |
y |
Required |
Long |
The vertical distance (in pixels) from the top of the screen to the point. |
Example
This example adds a new five-point star to slide one using the coordinates (288, 100). It then converts those coordinates from points to pixels, uses the RangeFromPoint method to return a reference to the new object, and changes the fill color of the star.
Dim myPointX As Integer, myPointY As Integer
Dim myShape As Object
ActivePresentation.Slides(1).Shapes _
.AddShape(msoShape5pointStar, 288, 100, 100, 72).Select
myPointX = ActiveWindow.PointsToScreenPixelsX(288)
myPointY = ActiveWindow.PointsToScreenPixelsY(100)
Set myShape = ActiveWindow.RangeFromPoint(myPointX, myPointY)
myShape.Fill.ForeColor.RGB = RGB(80, 160, 130)