Record MARCO's code

boolstatus = Part.Extension.SelectByID2("", "EDGE", 0.1680871981737, 0.2094171587345, -8498.047, False, 0, Nothing, 1)

Set CenterMark = Part.InsertCenterMark2(0, False)

If Not CenterMark Is Nothing Then

   CenterMark.RotationAngle = 0

   CenterMark.ConnectionLines = 0

End If

My question.

How to traversing  edge of hole. See Illustrations red arrow.