Тема: Обработчик событий.

Есть обработчик событий на модификацию полилинии:

Option Explicit
Public WithEvents polyObj As Acad3DPolyline
.....
Sub Poly()
.....
Set polyObj = ThisDrawing.ModelSpace.Add3DPoly(vertex)
'vertex - список вершин.
.....
End Sub
.....
Private Sub polyObj_Modified(ByVal pObject As AutoCAD.IAcadObject)
    MsgBox "Poliline has been modified"
End Sub

Но если, например, создать несколько полилиний, то обработчик взаимодействует только с последней полилинией. Что сделать, чтобы обрабатывались и ранее созданные полилинии?

Re: Обработчик событий.

потому, что:
Public WithEvents ...
надо:
Private WithEvents...

Re: Обработчик событий.

[Re:] callisto
потому, что:
Public WithEvents ...
надо:
Private WithEvents...

Не помогает.

Re: Обработчик событий.

> Сергей
Создать набор из полилиний и пройтись по нему в цикле.