Метод Window.RangeFromPoint (Word)

Статья
04/07/2023

Возвращает объект Range или Shape , расположенный в точке, указанной парой координат положения экрана.

Синтаксис

expression. RangeFromPoint (x, y)

выражение (обязательно). Переменная, представляющая объект Window .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
x	Обязательный	Long	Горизонтальное расстояние (в пикселях) от левого края экрана до точки.
y	Обязательный	Long	Вертикальное расстояние (в пикселях) от верхней части экрана до точки.

Возвращаемое значение

Объект

Замечания

Если диапазон или фигура не находятся в указанной паре координат, метод возвращает Значение 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

См. также

Объект Window

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через