Координаты Ballon

[bsfrc]

Доброго дня всем. Подскажите пожалуйста как с помощью vbscript получить координаты ballon'а на чертеже? И можно ли их загнать в какой-нибудь атрибут чертежа или параметр?

[Artem]

это DrawingText -обращение типа DrawingDocument1.Sheets.ActiveSheet.Views.ActiveView.Texts.Item(1).X или через selection. Для отсеивания от простого текста DrawingDocument1.Selection.Item(1).Value.FrameType (=3) и/или inStr(DrawingDocument1.Selection.Item(1).Value.Name,"Balloon")(>0). Переменную создать и туда координаты занести легко (запиши макрос при создании переменной в парте - в драфтинге аналогично), а вот динамического обновления при изменении положения элемента стандартными средствами не добиться...вроде можно через рейд если свой тип создать, ну или примитивно какой-нибудь таймер/службу заделать...

[bsfrc]

Спасибо