Перейти к публикации

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


Рекомендованные сообщения

3 hours ago, Ветерок said:

Вроде, команда Pack&Go делает всё то же самое штатными средствами? Можно сделать копии чего угодно куда угодно с каким угодно набором связанны файлов.

заметил одно неудобство в пак иго, вот не понятно почему я меняю имя верхней сборки оно подсвечивается зелёным а остальные имена этой же сборки куда входят детали не меняются автоматом,  

pack and go.png

Ссылка на сообщение
Поделиться на других сайтах


47 минут назад, ak762 сказал:

остальные имена этой же сборки

Я вообще не понимаю почему там многократно дублируются подобные вещи. Солид - что с него взять. В нём всё так.

Ссылка на сообщение
Поделиться на других сайтах
1 час назад, ak762 сказал:

заметил одно неудобство в пак иго, вот не понятно почему я меняю имя верхней сборки оно подсвечивается зелёным а остальные имена этой же сборки куда входят детали не меняются автоматом,  

pack and go.png

Так и должно быть. Нужные детали (которые тебе необходимы) сам  выбираешь и выбираешь папку куда сохранить

Ссылка на сообщение
Поделиться на других сайтах

 

3 часа назад, ak762 сказал:

заметил одно неудобство в пак иго, вот не понятно почему я меняю имя верхней сборки оно подсвечивается зелёным а остальные имена этой же сборки куда входят детали не меняются автоматом,  

Вот эту кнопку не пробовали?

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

2020-11-19_23-25-32.jpg

 

Ссылка на сообщение
Поделиться на других сайтах
19.11.2020 в 06:27, tompsongun сказал:

поправил макрос "переименование и сохранение с чертежом", если кому надо:

SaveAsCopy 2.3.3.zip 24 \u041a\u0431 · 7 скачиваний

 

- исправил ошибку завершения макроса в панели Custom Toolbar (CAD+ Toolset)Custom Toolbar (CAD+ Toolset) - спасибо за наводку artem_cad.

- убрал ник из заголовка формы.

- исправил ошибку - как следствие исправления первой и неопытности - запоминало имя закрываемого файла в сессии солида при повторном запуске макроса и подставляло его в качестве нового имени (не обнулялась переменная).

 

ссылка на первый пост с этим макросом

А есть ли возможность при копировании не копировать конверты?

Ссылка на сообщение
Поделиться на других сайтах

@DuS , дык он же только детали, копирует и сборку БЭЗ входящих, т.е. он конверты и не скопирует. он не как "пак энд гоу". в скопированной сборке входящие останутся предыдущие (выше на странице и писали, что было б неплохо если б и входящие копировались)

Ссылка на сообщение
Поделиться на других сайтах
1 час назад, tompsongun сказал:

@DuS , дык он же только детали, копирует и сборку БЭЗ входящих, т.е. он конверты и не скопирует. он не как "пак энд гоу". в скопированной сборке входящие останутся предыдущие (выше на странице и писали, что было б неплохо если б и входящие копировались)

Ясно, невнимательно прочитал описание. 

Мне в пак и го не хватает фильтра чтоб не копировал конверты. Если бы это реализовали в своем макросе было бы здорово)

Ссылка на сообщение
Поделиться на других сайтах
5 часов назад, DuS сказал:

Мне в пак и го не хватает фильтра чтоб не копировал конверты.

Не могу проверить, но вроде там напротив каждого файла есть чекбокс и, возможно, его можно отчекбоксить,- убрать галку напротив конверта. Если получится.

Ссылка на сообщение
Поделиться на других сайтах
1 час назад, none сказал:

Не могу проверить, но вроде там напротив каждого файла есть чекбокс и, возможно, его можно отчекбоксить,- убрать галку напротив конверта. Если получится.

Чек бокс есть, но если большая сборка и много конвертов, то нажимать придётся очень много. Поэтому и хочу фильтр типа "не копировать конверты и входящие в них". 

Ссылка на сообщение
Поделиться на других сайтах

Доброго всем дня. Кто подскажет почему таблица списка вырезов сварного изделия в упор не видит свойство Description которое указывает на имя конфигурации. Сия беда при попытки использовать сварные профили любезно выложенные уважаемым @tompsongun . Текстовое выражение вида Труба $PRP:"SW-Имя конфигурации" ГОСТ 8645 прекрасно читается в шаблонах профилей сварных деталей но после создания сварной детали в вычисленном выражении вместо Имени конфигурации появляется 00.

SW2020SP04/

 

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

 В сварной детали.jpg  Таблица.jpg  В чертежах.jpg

 

Изменено пользователем ГЕЛА
Ссылка на сообщение
Поделиться на других сайтах

@ГЕЛА , да моя вина. прошу прощения - не проверил. просто когда создавал шаблоны - в некоторых шаблонах указал, чтобы они брали имя конфигурации, а получается, что после применения их в детали - они берут имя конфигурации детали. 

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

 

Ссылка на сообщение
Поделиться на других сайтах

@ГЕЛА , вот исправил вроде как. вместо того свойства-ссылки на конфиги указал ссылки на размеры, а для швеллеров ручками поправил. в катанке обнаружил, что не все конфиги высвечены, а в таблице параметров - все.

 

эти файлы сделаны в 2020 солиде!

 Швеллер 8240.SlDLFPУголок равнопол 8509.SlDLFPУголок неравнопол 8510.SlDLFPТруба прямоуг 8645.SlDLFPТруба квадрат 8639.SlDLFPРукав ПВХ МБС.SlDLFPКатанка 30136.SlDLFP

 

(жаль старые посты нельзя поправить самостоятельно - кто-нибудь с того поста качнёт и .. такая "бяка")

Изменено пользователем tompsongun
Ссылка на сообщение
Поделиться на других сайтах
  • 2 недели спустя...

Макрос - открывает чертёж выбранного компонента из сборки (если чертёж существует и находится в одной папке с выбранным компонентом). Можно выбрать сборку или деталь в дереве, в окне модели выбирается только деталь. Если ничего не выбрано - откроется чертёж активного документа. Чертёж открывается в режиме "быстрый просмотр", для редактирования ПКМ по листу -> Загрузить лист. Даже очень тяжёлые чертежи загружаются за секунды

Открыть чертеж для просмотра.png

 

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

Option Explicit
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim longstatus As Long, longwarnings As Long
Dim SelMgr As SldWorks.SelectionMgr
Dim MyComp As SldWorks.Component2
Dim MyCompDrw As String
Dim swDocSpecification As SldWorks.DocumentSpecification
Dim sName As String

Sub main()
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
Set SelMgr = swModel.SelectionManager
If swModel.GetType <> swDocASSEMBLY Then
    MsgBox "Чертежи компонентов можно открывать только из файла сборки"
    Exit Sub
End If
    Set MyComp = SelMgr.GetSelectedObjectsComponent4(1, 0)
    
'    If MyComp Is Nothing Then
'    MsgBox "Чтобы открыть чертеж, выбери компонент"
'    Exit Sub
'    End If
        
    If MyComp Is Nothing Then
    MyCompDrw = Left$(swModel.GetPathName, (Len(swModel.GetPathName) - 6)) & "SLDDRW"
    Else
    MyCompDrw = Left$(MyComp.GetPathName, (Len(MyComp.GetPathName) - 6)) & "SLDDRW"
     End If
    
    On Error Resume Next
    
    swModel.ClearSelection2 True
    Dim Data As SelectData
    MyComp.Select4 False, Data, False

        Set swDocSpecification = swApp.GetOpenDocSpec(MyCompDrw)

sName = swDocSpecification.FileName
swDocSpecification.DocumentType = swDocDRAWING
'swDocSpecification.ReadOnly = True
swDocSpecification.Silent = False
'swDocSpecification.DetailingMode = True
swDocSpecification.ViewOnly = True
Set swModel = swApp.OpenDoc7(swDocSpecification)
longstatus = swDocSpecification.Error
longwarnings = swDocSpecification.Warning
    swApp.ActiveDoc.Visible = True
End Sub

 

Ссылка на сообщение
Поделиться на других сайтах

Переделал вчерашний макрос - открывает чертёж выбранного компонента из сборки (если чертёж существует и находится в одной папке с выбранным компонентом) и, если ничего не выбрано, открывает чертеж самой сборки/детали. Чертёж открывается в режиме "быстрый просмотр", для редактирования ПКМ по листу -> Загрузить лист. Даже очень тяжёлые чертежи загружаются за секунды . Чтобы чертежи открывались в обычном режиме, можно изменить строку swDocSpecification.ViewOnly = True (закомментировать или поставить False)

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

Option Explicit
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim longstatus As Long, longwarnings As Long
Dim SelMgr As SldWorks.SelectionMgr
Dim MyComp As SldWorks.Component2
Dim MyCompDrw As String
Dim swDocSpecification As SldWorks.DocumentSpecification
Dim Data As SelectData

Sub main()
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
Set SelMgr = swModel.SelectionManager

If swModel.GetType = swDocDRAWING Then
    MsgBox "Чертежи компонентов можно открывать только из файла сборки или детали"
    Exit Sub
End If
    Set MyComp = SelMgr.GetSelectedObjectsComponent4(1, 0)
        
    If MyComp Is Nothing Then
    MyCompDrw = Left$(swModel.GetPathName, (Len(swModel.GetPathName) - 6)) & "SLDDRW"
    Else
    
    MyCompDrw = Left$(MyComp.GetPathName, (Len(MyComp.GetPathName) - 6)) & "SLDDRW"
    End If
    
    On Error Resume Next
    
    swModel.ClearSelection2 True
    MyComp.Select4 False, Data, False
    
    Set swDocSpecification = swApp.GetOpenDocSpec(MyCompDrw)

swDocSpecification.DocumentType = swDocDRAWING
'swDocSpecification.ReadOnly = True
swDocSpecification.Silent = True 'False
'swDocSpecification.DetailingMode = True
swDocSpecification.ViewOnly = True
Set swModel = swApp.OpenDoc7(swDocSpecification)
longstatus = swDocSpecification.Error
longwarnings = swDocSpecification.Warning
swApp.ActiveDoc.Visible = True
End Sub

 

Исходник макроса брал с солидовского форума, тот макрос открывает компонент из сборки/чертежа

https://forum.solidworks.com/thread/70087#comment-371467

Может, кому знающему VBA, интересно будет сделать более продвинутую версию на основе этого макроса

https://www.codestack.net/solidworks-api/document/drawing/open-associated-drawing/

 

 

Ссылка на сообщение
Поделиться на других сайтах
4 часа назад, Kir95 сказал:

Переделал вчерашний макрос

А в чем переделка заключается? Только в том, что можно по умолчанию сделать полное открытие чертежа? У меня и так хорошо работает вчерашний макрос. Спасибо.

Ссылка на сообщение
Поделиться на других сайтах
1 час назад, none сказал:

А в чем переделка заключается?

В предыдущем варианте макрос не мог открывать чертеж из детали. Переделанный макрос открывает чертеж как из сборки, так и из детали.

Если я ничего не перепутал.

Изменено пользователем nahaus
Ссылка на сообщение
Поделиться на других сайтах
11 часов назад, Kir95 сказал:

Может, кому знающему VBA, интересно будет сделать более продвинутую версию на основе этого макроса

Почитал, макрос ищет чертеж с любым именем и в другой папке тоже может найти. А почему нельзя взять этот код один в один?

4 часа назад, nahaus сказал:

Переделанный макрос открывает чертеж как из сборки, так и из детали.

Вроде это заявлено и в первоначальном варианте.

Ссылка на сообщение
Поделиться на других сайтах
17 часов назад, none сказал:
05.12.2020 в 11:35, Kir95 сказал:

Может, кому знающему VBA, интересно будет сделать более продвинутую версию на основе этого макроса

Почитал, макрос ищет чертеж с любым именем и в другой папке тоже может найти. А почему нельзя взять этот код один в один?

А кто сказал, что нельзя?) Здесь немного перемешались вопросы/ответы с соседней ветки, там я этот макрос и предлагал использовать, но у макроса одна особенность - вместе с чертежом компонента открывается чертёж верхней сборки. Можно доделать макрос, чтобы чертежи компонентов открывать из чертежа сборки (с 2018 солида можно так и без макроса делать). Но моего basic english'а для этого не хватит, нужны знания visual basic )

Ссылка на сообщение
Поделиться на других сайтах

Добрый день, коллеги!
Суть в следующем:
В сборку вставляется файл детали (Н.sldprt), он лежит в определенной папке на диске (D:\WORK).
Далее этот файл сопрягается по исходной точке (с исходной точкой сборки).
Далее, вставленный файл делается виртуальным.
Этому файлу принудительно (вручную в окошке) назначается определенная масса (она может быть разной).

Дело в том, что эту процедуру мне приходится делать практически в каждой сборке и хотелось бы автоматизировать этот процесс.
Если это не займет много времени, может кто сподобится написать макрос?

Ссылка на сообщение
Поделиться на других сайтах

Присоединяйтесь к обсуждению

Вы можете опубликовать сообщение сейчас, а зарегистрироваться позже. Если у вас есть аккаунт, войдите в него для написания от своего имени.
Примечание: вашему сообщению потребуется утверждение модератора, прежде чем оно станет доступным.

Гость
Ответить в тему...

×   Вставлено в виде отформатированного текста.   Вставить в виде обычного текста

  Разрешено не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отобразить как ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставить изображения напрямую. Загрузите или вставьте изображения по ссылке.

  • Сейчас на странице   0 пользователей

    Нет пользователей, просматривающих эту страницу.




  • Сообщения

    • lem_on
      ну с дуру известно что сломать можно.
    • Viktor2004
      руку привязки так сломать легко
    • lem_on
      По моему вполне логично если станок вывалится в ошибку если рука не доехала до места. У меня так же если кулачки или деталь на пути, просто пихаеш ее до места и станок опять активен. Но нынешние пановья даже не могут написать модель станка.
    • Viktor2004
      Я согласен что скорее всего проблема механическая Но если логика прописана криво и возможно не предусмотрела остановку в промежуточном состоянии, разве не логично будет попробовать принудительно подав напряжение дернуть эту руку вверх-вниз? Возможно то что туда попало выпадет  
    • Guhl
      Если оставить за скобками вопрото том, что до м19 работает нормально, а после нет, то вы не считали сколько у него реально импульсов на оборот? с помощью стороннего плк, например  А если ориентацию м5 снимать, а не м20?
    • lem_on
      Что это за станок такой в котором сразу ладер ковырять надо, даже не смотря на возможность механической проблемы? Или профдеформация?
    • Viktor2004
      не сразу я понял в чем вопрос. Долго соображал что такое режим управления скоростью. При завершении ориентации PMC снимает сигнал G70.6 ? И если он после снятия сигнала продолжает удерживать шпиндель, при каких условиях эта ориентация все же снимается? После нажатия аварийного грибка или еще как?
    • Viktor2004
      Ладдер пришлите. Будем принудительно пробовать поднимать и опускать
    • streamdown
      Коллеги приветствую! IPS 8. Подскажите пожалуйста, кто какое серверное железо использует? Интересуют параметры при одновременной работе, ну например, 400 пользователей онлайн
    • gudstartup
      так он так и позиционируется по m19 pmc выдает g70.6 а чпу отвечает f45.7 но ориентацию и смещение в 4077 он отрабатывает нормально шпиндель встает ровно и смена происходит хорошо. вопрос почему после ввода команды управления скоростью он все еще продолжает контролировать число импульсов между нуль метками хотя в принципе уже должен отменить позиционный контроль и просто считать обороты по 0 метке как он это делает без М19? это все понятно но почему оно продолжает проверять это после завершения ориентации мне непонятно
×
×
  • Создать...