Window.RangeFromPoint 方法 (Word)

返回由屏幕位置坐标对指定点所在的 区域 或 图形 对象。

语法

表达式。RangeFromPoint (x， y)

expression 是必需的。 一个代表 Window 对象的变量。

参数

名称	必需/可选	数据类型	说明
x	必需	Long	从屏幕左边缘到该点的水平距离（以像素为单位）。
y	必需	Long	从屏幕顶部边缘到该点的垂直距离（以像素为单位）。

返回值

Object

备注

如果在坐标对指定的位置中没有区域或图形，则该方法返回 Nothing 。

示例

本示例新建一篇文档，并添加五角星。 然后，获得形状的屏幕位置并计算形状的中心所在。 使用这些坐标，该示例使用 RangeFromPoint 方法返回形状的引用并更改其填充颜色。

Dim pLeft As Long 
Dim pTop As Long 
Dim pWidth As Long 
Dim pHeight As Long 
Dim newShape As Object 
Dim newDoc As New Document 
 
With newDoc 
 .Shapes.AddShape msoShape5pointStar, _ 
 288, 100, 100, 72 
 .ActiveWindow.GetPoint pLeft, pTop, _ 
 pWidth, pHeight, .Shapes(1) 
 Set newShape = .ActiveWindow.RangeFromPoint(pLeft _ 
 + pWidth * 0.5, pTop + pHeight * 0.5) 
 newShape.Fill.ForeColor.RGB = RGB(80, 160, 130) 
End With

另请参阅

窗口对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。