VetCAD

Удаление слоев. VBA

    0 оценок

den001

размещено: 21 Февраля 2007
обновлено: 01 Марта 2007
Три программки на VBA для решительного удаления слоев вместе с объектами.

QuickLayDel - несколько упрощенный аналог экспрессовской команды LayDel. Работает на порядок быстрее (особенно в "тяжелых" чертежах и при удалении сразу нескольких слоев). Предлагает выбрать объект на слое, подлежащем удалению. Отказ от выполнения команды - Esc, подтверждение - правая кнопка мыши.

DelOffLayers - удаляет все выключенные слои (если они не заблокированы и не заморожены).

DelFreezeLayers - удаляет все замороженные слои.

Слои 0 и Defpoints, как водится, неприкосновенны.

Комментарии

Комментарии могут оставлять только зарегистрированные участники
Авторизоваться
Комментарии 1-10 из 13
LeoT , 01 марта 2007 в 20:07
#1
спасибо - работает
но если возможно сделать тоже самое для замороженых слоев(заморозку применяю гораздо чаще)
-был бы вам очень признателен
Dr. Dron. , 01 марта 2007 в 23:23
#2
> roman56
Всегда пожалуйста :-)
LeoT , 02 марта 2007 в 12:29
#3
еще раз спасибо
как говорят-наглость это второе счастье-поэтому попрошу вас еще об одной услуги:
я на работе работаю под acad LT но он не поддерживает
файлы dbd-(и если это возможно ) выставить открытый лисп(пусть будет закомпиллированый но с расширением lsp)
заранее благодарен-роман
Dr. Dron. , 02 марта 2007 в 16:04
#4
Вот это-то как раз и невозможно. Файл с расширением lsp из этого никак не получится, потому что написано сие на VBA (dvb-шник, кстати, открыт). А LT, судя по всему, VBA не поддерживает (и в форуме что-то об этом было). Так что извините, тупичок-с.
LeoT , 02 марта 2007 в 18:08
#5
измаил-брал
астрахань-брал
autoLisp-брал
а вот VBA-не знаю не брал
ну все равно спасибо
Alexander_Liseev , 24 ноября 2009 в 11:49
#6
Спасибо за программку
remorova , 19 марта 2010 в 11:09
#7
Оуу, мне надо такую срочно! Прямо сейчас надо! а подскадите как установить? на autocad 2010
den001 , 20 марта 2010 в 02:59
#8
Знающие люди говорят, что для того, чтобы в 2010-м работали VBA-макросы, нужно скачать и установить следующую программку:
[url]http://images.autodesk.com/adsk/files/autocad2010vbaenabler32.exe[/url]
Сам не пробовал, у меня 2008-й
remorova , 22 марта 2010 в 10:57
#9
..скачала, установила autocad2010vbaenabler32.exe.. А теперь что?? само оно не хочет устанавливаться :/
den001 , 22 марта 2010 в 21:00
#10
Добавить файлы .dvb и .lsp в список автозагрузки Автокада (Сервис -> Приложения -> Автозагрузка). Запускается вышеуказанными командами (QuickLayDel, DelOffLayers, DelFreezeLayers, соответственно). Можно повесить их на кнопки. Можно запускать из списка макросов ([Alt+F8] или [Сервис -> Макросы -> Макросы...] -> <нужный макрос> -> Выполнить
zip

0.01 МБ

СКАЧАТЬ