Найти в Дзене
Ищем обозначение сварного шва на чертеже.
Попадает к нам многолистовой чертеж с таблицей сварных швов. Надо найти шов на чертеже или проверить таблицу сварных швов. С помощью макроса после введения номера сварного шва нам открывается лист чертежа где этот шов впервые показан и выделяются все швы под этим номером на этом листе. Далее разбираем саму суть макроса. Начало такое же как и во всех макросах: подключаем solid, берём активный документ, проверяем тип документа. Код целиком в конце статьи. Если это первое совпадение после запуска...
7 месяцев назад
Переделать нельзя, оставить.
Попалась мне как-то вот такая деталь и ее нужно было изменить. Открыв эскиз, я увидел это: Естественно я ее полностью переделал за минуту. Стараюсь сразу продумывать топологию и возможность быстрой параметризации модели. Когда выходит новая версия Solidworks я всегда смотрю раздел "Что нового?", постоянно появляются новые инструменты и методики...
7 месяцев назад
Спецификация Solid-Excel-Компас.
Нужно создать групповую спецификацию на два исполнения. Мы используем макросы SWPlus, но иногда ругаются на формат спецификации. Раньше мы делали спецификацию вручную в компасе. Пришлось быстро придумать костыльный метод создания спецификации в Компасе через Ексель. Сохраняем спецификацию в формате Ексель в удобную папку. Подключаем библиотеки Excel и Компаса через Tools-References (в редакторе VBA). sApp = "Excel.Application" If IsAppRunning(sApp) = True Then 'MsgBox "Ok. Excel запущен" Else ' MsgBox "Fuck...
8 месяцев назад
Удалить ненужные обозначения.
Это продолжение статьи про переименование нескольких деталей из дерева. Начало тут. Повторюсь, что я выкладываю всего лишь один из вариантов кода решения. Весь смысл постов больше в том, чтобы показать как из кусков кода из хелпа или от нейросети подходить к алгоритму и синтезировать решение. Выбираем детали (одну или несколько, можно с повторениями) в дереве или поле модели. Запускаем макрос. Формируется список деталей с уникальными названиями. Из названия берется первое слово и проверяется на наличие цифр...
8 месяцев назад
Децимальные обозначения за секунды
У меня часто бывает, что узел смоделирован, а обозначений еще нет или произошла перекомпоновка и надо поменять обозначения. Вот так я это делаю за секунды. Вторая часть тут. Детали в дереве у Solidworks переименовываются временно до сохранения сборки. При сохранении сборки обычно предлагается обновить ссылки на существующие чертежи. Если ссылки не обновить, то в чертежах будут пустые виды т.к. имя файла детали изменено. Если диалоговое окно не выводится - зайдите в настройки (шестеренку) и нажмите как на картинке...
8 месяцев назад
Нормальный значек шероховатости.
Привет. Сегодня короткий макрос изменения значка шероховатости. Выбираем заметки со значками шероховатости и запускаем макрос. Текст заметок может быть разным. Чтобы вернуть как было поставьте эту галочку: Алгоритм работы думаю понятен по самому коду. Option Explicit Dim swApp As SldWorks.SldWorks Dim Part As SldWorks.ModelDoc2 Dim SelMgr As SldWorks.SelectionMgr Dim swNote As SldWorks.Note Dim anSFSymbol As SldWorks.SFSymbol Dim Anno As SldWorks.Annotation Dim swTextFormat As SldWorks.TextFormat...
8 месяцев назад
Мои ошибки. Чего я раньше не делал, при написании макросов.
Почему именно VBA? Да, я изучаю и C#, и python, но есть нюанс) Не на всех работах и не во всех компаниях есть возможность на компьютере устанавливать свой софт и аддоны. Редактор VBA есть по умолчанию, код макроса не требует компиляции. Его можно сразу запускать. Я стараюсь не делать большие и сложные макросы - так мне проще быстро вносить изменения под новые задачи. Когда я только начинал, я не углублялся в теорию и оптимизацию. Я просто брал куски кода из интернета и пытался их как-то состыковать методом тыка...
8 месяцев назад
Ленивый инженер: Почему я создал этот канал.
Я много лет работаю инженером-конструктором и провел сотни часов за рутинными операциями в различных САПР. Однажды я понял, что эта рутина не просто отнимает время. Она убивает главное — вкус к сложным, интересным задачам, к самому творчеству в проектировании. Что это не та работа, ради которой я становился инженером. Настоящая инженерия для меня — это не клики мышью, это решение задач. Да, иногда, бывают моменты, что просто нет ресурсного состояния сидеть и полностью погружаться в работу, начинается прокрастинация, ожидание конца рабочего дня и т...
8 месяцев назад