3개의 선택셋에 각각 같은 종류의 엔티티끼리 모았습니다.
아래와 같이 코딩해서 보니, 각 선택셋에 엔티티들이
잘 들어가는 확인할 수 있었습니다.
그런데. SelPoly라는선택셋에 있는 엔티티의 갯수를 보고자
Msgbox SelPoly.Count하니까 0으로 나와서,
Msgbox Str(SelPoly.Count) 해도 마찬가지 결과입니다.
무엇이 잘못된 걸까요?
…
For I = 0 To ThisDrawing.ModelSpace.Count – 1
If ssobjs(I).EntityName = “AcDbPolyline” Then
SelPoly.AddItems ssobjs(I)
ElseIf ssobjs(I).EntityName = “AcDbLine” Then
Selline.AddItems ssobjs(I)
ElseIf ssobjs(I).EntityName = “AcDbText” Then
Seltext.AddItems ssobjs(I)
End If
Next
…