Как в автокаде посчитать длину нескольких линий

Обновлено: 08.07.2024

Программа " Суммарная длина линий в AutoCAD " является плагином для AutoCAD , написанным на VBA.

Данный плагин предназначен для подсчёта суммарной длины выбранных линий.

Программа может суммировать длины всех выбранных линий, находящихся в разных слоях, так и по одному слою, который выбирается из списка слоёв. Для того чтобы считалась сумма только по одному слою необходимо перед выбором линий выбрать слой из списка и поставить галочку "Считать длину линий только для указаного слоя". Далее необходимо нажать на кнопку "Выбрать линии" и выбрать область рисунка в котором необходимо посчитать сумму длин линий. Результат запишется в текстовое окно "Суммарная длина линий".

В текстовом окне "Коэффициент" можно указать коэффициент для пересчёта суммы длины линий в текстовое окно "Суммарная длина линий + (. %), м ", это может быть полезным, например, для увеличения суммы длины трубы на 10% при расчёте спецификации ВК.

В текстовом окне "Количество единиц длины в 1 м натурной длины линии", можно указать соответствующий масштаб чертежа.

Пример использования программы можно посмотреть в прилагающемся видеоролике.

Программа "Сумма длин линий" является плагином для AutoCAD, написанным на VBA.

Данный плагин предназначен для подсчёта суммарной длины выбранных линий.

Программа может суммировать длины всех выбранных линий, находящихся в разных слоях, так и по одному слою, который выбирается из списка слоёв. Для того чтобы считалась сумма только по одному слою необходимо перед выбором линий выбрать слой из списка и поставить галочку "Считать длину линий только для указаного слоя". Далее необходимо нажать на кнопку "Выбрать линии" и выбрать область рисунка в котором необходимо посчитать сумму длин линий. Результат запишется в текстовое окно "Суммарная длина линий".

В текстовом окне "Коэффициент" можно указать коэффициент для пересчёта суммы длины линий в текстовое окно "Суммарная длина линий + (. %), м", это может быть полезным, например, для увеличения суммы длины трубы на 10% при расчёте спецификации ВК.

В текстовом окне "Количество единиц длины в 1 м натурной длины линии", можно указать соответствующий масштаб чертежа.

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

Для начала работы с программой необходимо загрузить макросом в AutoCAD, для этого надо зайти в меню Сервис=>Макросы=>Диспетчер VBA,

при этом откроется окно "Диспетчер VBA", в котором необходимо нажать кнопку "Згрузить" и в окне "Открытие проекта VBA" выбрать

файл макроса DlinaTrub.dvb и нажать кнопку открыть. Таким образом мы загрузили файл макроса DlinaTrub.dvb.

Запустить данный плагин в AutoCAD можно 2-мя способами:

В командной строке ввести "vbarun" и нажать клавишу Enter(ввод), при этом должно выскочить окно "Макросы"

с выбором загруженных в AutoCAD макросов. Из них необходимо выбрать макрос имеющий путь, соответствующий

текущему местонахождению файла DlinaTrub.dvb. Например, если файл DlinaTrub.dvb лежит в папке, имеющей путь:

"C:/Documents and Settings/1/Мои документы/VB/", то вам необходимо выбрать строку:

"C:/Documents and Settings/1/ Мои документы /VB/DlinaTrub.dvb!Module1. DlTrRun" и нажать кнопку выполнения, где:

Module1 - название модуля в котором находится макрос;

DlTrRun - название процедуры запускающей макрос.

Запуск макроса из командной строки неудобен, т.к. приходится при каждой загрузке AutoCAD сначала загружать файл макроса DlinaTrub.dvb, а потом и запускать его из командной строки. Для избегания этого используйте 2-й метод.

2)Создание и установка кнопки на новой или существующей панели инструментов AutoCAD.

Для создания новой кнопки через меню Сервис=>Интерфес. откройте окно "Настройка интерфейса пользователя" и

во вкладке Адаптация в разделе "Список команд" нажмите кнопку "Создать" для создания новой команды. Затем в

разделе "Адаптации в Все файлы CUI" раскройте список "Панели", потом раскройте любую из существующих панелей

либо создайте свою(щёлкните правой клавишей мыши на списке "Панели" и в контекстном меню выберите Содать=>Панель задайте ей имя).

В раскрытую созданную или существующую панель перетащите созданную новую комманду. Затем выберите новую команду и задайте её свойствам следующие значения:

*3.Макросы - ^C^C-vbarun "путь к папке с файлом макроса DlinaTrub.dvb/DlinaTrub.dvb!Module1.DlTrRun"

^C^C-vbarun "C:/Documents and Settings/1/ Мои документы /VB/DlinaTrub.dvb!Module1.DlTrRun"

^C^C-vbarun "C:/Users/Desktop /DlinaTrub.dvb!Module1.DlTrRun"

- ВНИМАНИЕ . поле макросы заполнять строго как указано в примере, с учётом всех знаков и пробелов, иначе макрос не запустится, заметьте что здесь используется только правый слэш(/), а не левый(\) как обычно.

4.Малое изображение - "путь к папке с файлом картинки Для суммы длин линий.BMP / Для суммы длин линий.BMP" (например:"C:/Documents and Settings/1/Мои документы/VB/Для суммы длин линий.BMP")

5.Большое изображение - то же что и Малое изображение.

*Примечание пункт *3.Макросы является обязательным для заполнения, все остальные пункты рекомендуемые, но их можно не заполнять.

После выполнения вышеуказанных процедур на новой или существующей панели соответственно должна появиться кнопка, при нажатии на которую

должно запускаться окно с программой "Инженерная Аксонометрия", если окно не появляется то значит вы неправильно заполнили поле *3.Макросы,

Читайте также: