[128500]

Помогите с такой проблемой:
Есть файл автокада, в нем как положено куча схем, чертежей и таблиц. В таблицах содержатся ссылки на другие таблицы этого же файла. Проблема в том, что разобраться в перекрестии этих ссылок не получается, при клике не поле таблицы, содержавшем ссылку к другой таблице открывается окно "Поле" с формулой вида Table(2120226280).t7. В автокаде я чайник, но Гугл подсказывает, что смысл в том что формула возвращаетс значение ячейки Т7 таблицы, ID которой 2120226280. Тут то и состоит облом, что непонятно как найти объект по его ID. Возможно я ошибаюсь, но в автокаде нет человеческого способа это сделать. В теме http://autolisp.ru/2011/07/07/x32x64objectid/ автор приводит код, который вроде как позволяет получить указание на объект по его ID, но у меня не получается, хотя делаю все по статье Как использовать код на лиспе, пишет "ошибка, слишком мало аргументов".
В общем, собственно вопросы:
1. Можно ли требуемое осуществить средствами автокада, без всякого лиспе? Если нет то
2. Код выше можно использовать для моей цели? Если да, то как?
В идеале хотелось бы конечно вообще функцию через defun C:, чтобы вызвать ее, скормить ID и сразу получить выделенной искомую таблицу, причем чтобы работала она в любом автокаде независимо от разрядности системы. Но это уже совсем хорошо бы, а по факту хоть как бы.

[Дима_]

Код:

[Выделить все]

 (vl-load-com)
(defun select-id(id)
  ((lambda (ent)
     (if ent (sssetfirst nil (ssadd ent))
             (princ "Не найден объект"))
     (princ))
   (car (vl-remove-if '(lambda (x) (or (listp x)
                                       (not (equal id (vla-get-objectid (vlax-ename->vla-object x))))))
                      (mapcar 'cadr (ssnamex (ssget "_a")))))))
(defun c:select-id()
  (select-id (getreal "\nВведите ID объекта ")))

вызывать либо (select-id xxx) где xxx id объекта, либо просто select-id с "рукопашным" вводом

[128500]

Дима_
Спасибо большое, именно то что нужно и все отлично работает.