Сделай свою работу в Solidworks эффективнее

[Kelny 1,602]

17 минут назад, Snake 60 сказал:

Бывает, конечно осечка.

[609p 0]

День добрый. Подскажите, пожалуйста, хотелось бы написать макрос на Python, для добавления детали с сборку. Но пока не знаю как?

Может у кого-то есть информация.

[maxx2000 1,161]

а чем не устраивает родная кнопка?

[Chuvak 192]

@609p  Класс AssemblyDoc, метод AddComponent5 (для вставки одного компонента) и метод AddComponents3 (для вставки нескольких компонентов). Оба метода доступны с SW 2011 по SW 2025

[609p 0]

Спасибо @Chuvak , только блин, не посмотрел что это тема по солиду. А для компаса такого нет?

[Chuvak 192]

@609p, к сожалению, я пока мало знаком с объектной моделью Компас-3D. Лучше задайте вопрос в соответствующей ветке форума или создайте новую)

Edited August 8, 2025 by Chuvak

[anti84 3]

Всем привет) Задача такая: для маркировки длины трубы на лазерном труборезе необходимо пакетное переименование файлов этих самых труб по некому шаблону (достаточно брать длину трубы из свойств). В какую сторону двигаться? Есть ли макросы для этого? Файлы труб создаются одноразово при конвертации из детали в сборку (тело 1, тело2 и т.д.) металлоконструкции.

Edited August 15, 2025 by anti84

[anti84 3]

31.05.2025 в 13:56, Maik812 сказал:

стандартный инструмент СВ переименовать имя файла по обозначениям или наименованию. этих макросов  тут море.

.

 

Ткните пожалуста носом в подобные макросы. Нужно групповое переименование файлов по свойству "длина"

[Chuvak 192]

@anti84 , а какая у Вас версия SW ?

[anti84 3]

@Chuvak 24

Edited August 19, 2025 by anti84

[nahaus 19]

Доброе утро неожиданных открытий.

Много лет мне ломает глаза эта ячейка, в которой очень мелкий шрифт, а масштабированием windows не удобно ее менять.

И вот сегодня попробовал CTRL + колесико мышки и о чудо размер шрифта меняется. Может кому-то пригодится.

[Kelny 1,602]

5 часов назад, nahaus сказал:

Доброе утро неожиданных открытий.

https://cccp3d.ru/topic/10358-скрытые-возможности-sw/?do=getLastComment

 

[livedten 52]

Такой вопрос, частенько работаю с уравнениями(привязками к размерам) детали, и если к примеру скопировал деталь(ctrl+ЛКМ) сделал ее независимой (аналогичная новая, но нужны другие размеры), запрашивает при нажатии на размер "размер только для чтения" изменить нельзя пока не отключить галочку для чтения в размерах. Может есть макрос типа, выбираю деталь нажимаю на макрос и он автоматом снимает все размеры для чтения с выбранной мною детали. 

[Chuvak 192]

@livedten, таких макросов не видел, но могу попробовать написать. У Вас какая версия SW ?

[livedten 52]

1 час назад, Chuvak сказал:

@livedten, таких макросов не видел, но могу попробовать написать. У Вас какая версия SW ?

23

[Chuvak 192]

@livedten , макрос протестирован и готов

Скрытый текст

Option Explicit

'---БЛОК ОБЪЯВЛЕНИЯ ПЕРЕМЕННЫХ SOLIDWORKS---
Private swApp                       As SldWorks.SldWorks
Private swModel                     As SldWorks.ModelDoc2
Private swModelDocExt               As SldWorks.ModelDocExtension
Private swFeature                   As SldWorks.Feature
Private swDimen                     As SldWorks.Dimension
Private swDispDimen                 As SldWorks.DisplayDimension
Private i                           As Long
Private boolStatus                  As Boolean

Public Sub Prog1_MainProgram()    ' Главная программа макроса "Деактивация атрибута "Только для чтения" у размеров"
    
    On Error GoTo ErrorHandler      ' активируем обработчик ошибок
    
    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc

    '---БЛОК ПРОВЕРОК ОТКРЫТИЯ И СООТВЕТСТВИЯ ФАЙЛА МОДЕЛИ ДЕТАЛИ---
    If swModel Is Nothing Then          ' если модель детали не открыта, то
        MsgBox Prompt:="Модель детали не открыта. Пожалуйста, откройте файл детали перед выполнением операции", Buttons:=48, Title:="Предупреждение"
        End ' закрываем макрос
    End If

    If swModel.GetType <> 1 Then        ' если тип документа - не деталь, то
        MsgBox Prompt:="Открытый документ не является моделью детали. Пожалуйста, откройте файл детали перед выполнением операции", Buttons:=48, Title:="Предупреждение"
        End ' закрываем макрос
    End If
    
    Set swModelDocExt = swModel.Extension
    If swModelDocExt.NeedsRebuild2 <> 0 Then boolStatus = swModel.ForceRebuild3(True)  ' если деталь не перестроена, то перестраиваем
    
    Set swFeature = swModel.FirstFeature    ' устанавливаем указатель на первый элемент в компоненте
    
    i = 0
    Do While Not swFeature Is Nothing       ' пока выбранный элемент не пуст, то
        Set swDispDimen = swFeature.GetFirstDisplayDimension
        Do While Not swDispDimen Is Nothing ' пока полученный размер не пуст, то
            Set swDimen = swDispDimen.GetDimension2(0)
            If swDimen.ReadOnly Then        ' если у размера атрибут "Только для чтения", то
                swDimen.ReadOnly = False    ' деактивируем
                i = i + 1
            End If
            Set swDispDimen = swFeature.GetNextDisplayDimension(swDispDimen)    ' переходим к следующему размеру
        Loop
        Set swFeature = swFeature.GetNextFeature    ' переходим к след. элементу
    Loop
    
    If i > 0 Then
        MsgBox Prompt:="Операция успешно выполнена!" & vbNewLine & "Кол-во найденных размеров с атрибутом ""Только для чтения"": " & i, Buttons:=64, Title:="Сообщение"   ' открываем сообщение об успешном завершении операции
    Else
        MsgBox Prompt:="Модель не содержит размеров с атрибутом ""Только для чтения""", Buttons:=64, Title:="Сообщение"   ' открываем сообщение
    End If
    
    End ' закрываем макрос
        
ErrorHandler:   ' если в макросе произошла ошибка, то
    MsgBox Prompt:="ВНИМАНИЕ! Произошла непредвиденная ошибка." & vbNewLine & "Код и описание ошибки: " & vbNewLine & Err.Number & " - " & Err.Description, Buttons:=16, Title:="ОШИБКА" ' информируем о критической ошибке
    End     ' закрываем макрос
End Sub

 

Macros_DimReadOnlyDeactivate.sw2023_v1.swp

Edited October 16, 2025 by Chuvak

[madalik 15]

Добрый день всем!

 

Поставил СВ2024 СП5

 

Понадобилось поковырять макрос, открыл его..

Захотел почитать справку по оператору клавишами Ctrl + F1...... а вот кукиш там! 

 

Не показывает справку и всё. хоть тресни.

 

Гугление толку не дало....... может кто сталкивался с таким? Как блин ВЫЗВАТЬ  и почитать справку по VBA SW по строке под курсором???

 

[Snake 60 883]

1 час назад, madalik сказал:

Не показывает справку и всё. хоть тресни.

Читайте онлайн тогда: https://help.solidworks.com/2024/english/api/sldworksapiprogguide/Welcome.htm

 

Edited October 20, 2025 by Snake 60

[madalik 15]

29 минут назад, Snake 60 сказал:

Читайте онлайн тогда: https://help.solidworks.com/2024/english/api/sldworksapiprogguide/Welcome.htm

 

Да это понятно :-)

 

Мне бы чтоб по Ctrl-F1 вылазила справка. В предыдущем Солиде с этим проблем не было

[malvi.dp 301]

11 часов назад, madalik сказал:

Мне бы чтоб по Ctrl-F1 вылазила справка

У меня просто по F1 работает (sw2020).