VetCAD

Макрос для сводки кабелей в каб.журнале в чертежах AutoCad

    0 оценок

Chitozzz

размещено: 14 Января 2012
обновлено: 14 Января 2012
В архиве макрос написанный на VBA для автокада.
Макрос создан для облегчения подчета кабеля в схемах распределительных электрических сетей или в кабельных журналах.
При запуске выбирается последовательно из кабельного журнала колонка с маркой кабеля, колонка с сечением и колонка с длинами... нажимается кнопка расчет и выводится сводка кабелей в виде таблицы... Может считать провода с учетом РЕ жилы.
Если что-то не понятно то посмотрите видео-инструкцию в моем блоге...ссылка вот http://chitozzz.ru/2012/01/14/makros-dlya-avtomaticheskogo-podscheta-kabelya-v-kabelnom-zhurnale-ili-raspredelitelnoj-seti/
Макрос для сводки кабелей в каб.журнале в чертежах AutoCad1

Комментарии

Комментарии могут оставлять только зарегистрированные участники
Авторизоваться
Комментарии 1-10 из 13
Nikolay 2 , 17 января 2012 в 22:20
#1
Не работает, ACad 2008rus+SP1 Compile Error: Can't find project or library
и что ему надо?
chitozzz , 18 января 2012 в 09:39
#2
Было подобное с автокадом 2011 на винде ХР, не может найти библиотеки, откройте редактор VBA в меню tools выберите пункт Referenses .. в окошке будет видно какие библиотеки подключены и их путь ... не найденные библиотеки будут подсвечены...у них может быть оказаться другой путь к файлам (нужно перезадать пусть) или как мы решили проблему взяли библиотеки с другого компьютера где все работает...
chitozzz , 18 января 2012 в 22:25
#3
Скорей всего редактор VBA не может найти библиотеки, такое уже было на автокаде 2011 на винде ХР... зайдите в настройки редкатора VBA и найдете там список подключенных библиотек и увидите на что ругается... решили проблему копированием этих библиотек с другого компа на котором все работает...
tugris , 01 февраля 2012 в 18:45
#4
А если нет другого компа на котором все работает, то что делать?
chitozzz , 03 февраля 2012 в 23:30
#5
скачать недостающие библиотеки с интернета...если не найдете скажите какие библиотеки не найдены я вам вышлю...
tugris , 06 февраля 2012 в 15:41
#6
Если честно не могу понять какую библиотеку ему надо. подсвечивает эти две строчки:
Private Sub CommandButton1_Click()
ssetObj
tugris , 09 февраля 2012 в 15:16
#7
Ну и где автор?
chitozzz , 09 февраля 2012 в 21:23
#8
библиотеки нужно смотрет так: нажмите Tools->Macro->Visiual Basic Editor ... в запустившемся окне редактора VBA в меню нажмите Tools->References .. там выйдет окно со списком... если что то не так, то увидите надпись напротив библиотеки или красный крестик, это говорит о том что библиотека не найдена...
tugris , 10 февраля 2012 в 18:01
#9
Спасибо за ответ. А какие библиотеки нужны для этого макроса? У меня автокад 2012 и нет ни одного крестика напротив библиотек.
Извините, но до понедельника интернета у меня нет (только на работе, домой проводить дорого)
chitozzz , 29 февраля 2012 в 12:44
#10
делал этот макрос на автокаде 2006, там все норм работает... в новом автокаде изменился VBA и вомозно от этого проблемы... но 2009 пробовал и 2012 все работает... как будет возможность я поправлю под эти версии автокада... пока что можно сказать что все равботает на автокаде 2006
zip

0.08 МБ

СКАЧАТЬ