[kakt00z]

Решил поделиться двумя своими, на мой взгляд полезными, командами

Программа позволяет экспортировать в excel и импортировать назад содержимое аттрибутов блоков

ЗАПУСК программы производится из командной строки автокада путем ввода букв:
blks>excel[enter]
или
excel>blks[enter]

Пояснения:
blks>excel - экспортирует данные из атрибутов выделенных блоков автокада во вновь создаваемое окно excel
выделить блоки можно как до запуска команды так и после
(подсказка: выделяя блоки до запуска команды можно использовать фильтры выбора (команда _filter) или команду "Select Similar" из
всплывающего меню (правый щелчек мыши) на выделенном блоке
таким образом заранее сформировав нужный набор блоков)
В итоге, создается файл excel в котором каждому блоку будет соответствовать строка данных с заполненными значениями из аттрибутов
в шапке таблицы - имена атрибутов
и еще будет 1 столбец (или несколько - если в наборе были разные блоки) с "ручками" представляющими собой уникальный адрес блока в файле чертежа
по этому адресу можно будет импортировать данные из файла ексель назад в автокад

обратный импорт данных:
предварительно, в окне excel выделяется нужный диапазон данных - все данные или их часть (главное чтобы в набор попадала шапка таблицы и столбец(ы) с ручками)
далее идем в автокад и запускаем команду excel>blks

можно сохранять файл ексель и производить импорт данных позже, но тут важно понимать - если вы после экспорта скопировали
целевые блоки и вставили вновь (например для альтернативного решения) а старые удалили, то - хоть внешне этот набор не будет отличаться от
исходного, но ручки (handles) будут другие, и данные из файла excel не импортируются

v1.1 - исправлена сортировка

[dip]

Обратно в автокад не получается. Пишет" inspect #excel>blks:reprt to see report"

[kacugu]

а в чём отличие от ATTIN и ATTOUT?

[dip]

Сообщение от dip Обратно в автокад не получается. Пишет" inspect #excel>blks:reprt to see report"

С этим вроде разобрался. Программа вроде работает. Но в итоге не меняет значение атрибутов а автокаде. Может ваша программа не работает с динамическими блоками?

[kakt00z]

Сообщение от kacugu а в чём отличие от ATTIN и ATTOUT?

хм.. да вроде как только отсутствием итерации сохранения текстового файл и последующем открытии его в екселе
а давно эти команды в ET ?

[kacugu]

Сообщение от kakt00z а давно эти команды в ET ?

Точно не знаю, но команды далеко не новые

[kakt00z]

Сообщение от dip С этим вроде разобрался. Программа вроде работает. Но в итоге не меняет значение атрибутов а автокаде. Может ваша программа не работает с динамическими блоками?

поправил. что говорит теперь?

[dip]

Сообщение от kakt00z поправил. что говорит теперь?

не обновляет он атрибуты в чертеже после команды excel>blks
Может я не правильно в эксель выделяю. Скрин прилагаю

[frostmourn]

Аж зарегистрировался.
Всё гораздо проще. kakt00z, у вас там #actdoc не инициализирован.
dip, добавьте строчку

Код:

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

(setq #actdoc (vla-get-activedocument (vlax-get-acad-object)))

И, кстати, традиционный (vl-load-com) не помешает.

[dip]

Сообщение от frostmourn Аж зарегистрировался. Всё гораздо проще. kakt00z, у вас там #actdoc не инициализирован. dip, добавьте строчку Код: [Выделить все] (setq #actdoc (vla-get-activedocument (vlax-get-acad-object))) И, кстати, традиционный (vl-load-com) не помешает.

Спасибо, конечно. Только куда именно в лиспе добавить эту строчку (за какой строчкой)? Я не силен в лисп программировании

[kakt00z]

как обычно )) на старые грабли завтра исправлю
а выделять нужно рамкой... это тоже забыл написать... перемещая ненужные столбцы в сторону ... пока что так...

----- добавлено через ~22 ч. -----
замечания исправил, + можно как на скриншоте в #8

[dip]

Спасибо тебе большое, Уважаемый kakt00z. Дай бог, всех благ тебе. Все работает. Давно ждал такую программу. Преимущества между этой программой и ATTIN и ATTOUT очевидны.

[Krovlaf]

Большое спасибо за программу! Однажды мне жутко надоело используя ATTIN и ATTOUT прыгать через текстовый файл в эксель и обратно. Да и динамических блоков (точнее их имен) Express не понимает. Нашел подобный инструмент в ToolPac. Весьма хорош. Но там те же проблемы с определением имен динамических блоков, да и обмен информации идет через csv, а это неудобно (для нормальной работы нужно изменять системные настройки разделителя элементов списка с ";" на ",")
Немного потестил. Проблемы:
1. Атрибутика в экселе вся представлена в текстовом формате. Причем попытки просто изменить формат ячеек на числовой с заданной точностью никчему не привели! Эксель не воспринимает эти данные как числа! Первый раз с таким сталкиваюсь. Изменить формат ячеек удалось только через ярлычок ошибки представления данных (преобразовать в число). Такая манипуляция отнимает кучу времени.
Нельзя ли данные атрибутов представить в экселе в общем формате, а имена HANDLE в первом столбце представлять с апострофом ' . В этом случае HANDLE будут правильно читаться, а все остальные данные, можно будет складывать делить итд, что согласитесь, логично для экселя.
2. Разделители десятичных разрядов импортируются в чертеж как запятые, хотя у меня вся система настроена на точки. Точка как дробный разделитель поставлена в системе как раз для того, чтобы ексель понимал данные из чертежа как числа и мог работать с ними.
В полученных из экселя атрибутах не отображаются нули после запятой, хотя формат ячеек был настроен.
Ну и еще один маааленький вопрос. Можно ли с помощью лиспа реализовать синхронизацию данных атрибутов открытого чертежа и книги экселя. Есть одна программка которая это делает, но уж больно много авторами наложено ограничений.

[skkkk]

kakt00z, в виду отсутствия производственной необходимости программу использовать не имею нужды, но бегло потестировав, имею замечание. Думаю, не лишним будет очищать форматирование атрибутов перед вставкой их в Excel, иначе получается то, что на картинке. Можно воспользоваться програмой от LeeMac : http://www.lee-mac.com/unformatstring.html

[kakt00z]

Сообщение от skkkk kakt00z, в виду отсутствия производственной необходимости программу использовать не имею нужды, но бегло потестировав, имею замечание. Думаю, не лишним будет очищать форматирование атрибутов перед вставкой их в Excel, иначе получается то, что на картинке. Можно воспользоваться програмой от LeeMac : http://www.lee-mac.com/unformatstring.html

На первый взгляд, неплохое замечание, но
Возникает вопрос - а как тогда вставлять назад?
Форматирование уберется, и атрибут (конкретный), который раньше был "подогнан" [например по степени сжатия чтобы "влазило" в ячейку], станет налетать на линии таблицы*.
И, даже подумав еще чуть-чуть, возникнет мысль, что не плохо было бы считывать форматирование каждого атрибута перед вставкой данных, и применять его, но
всё было бы неплохо, если бы это самое форматирование было применено на весь текст целиком, а если нет? мысли уходят в применение "масок" и т.п. в пределе - искусственный интеллект
и тут уже встает мысль о целесообразности такого занятия, времени и мотивации
так что выбор оставлен в сторону того, что "не документ а для себя" (acad vs excel)