Объект.InRectangle ( p1 As Point, p2 As Point ) As ShapeRange
Точки p1 и p2 задают верхний левый и нижний правый углы прямоугольника. Метод возвращает только те геометрические объекты, которые целиком находятся внутри прямоугольника.