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

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


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

8 минут назад, YaDen сказал:

но вирустотал ругается

Тогда не используйте :smile: логично же

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


@kkk

В ‎04‎.‎09‎.‎2017 в 11:32, kkk сказал:

макрос для создания чертежа детали прямо из сборки

В окне модели solidworks при выборе компонента в дереве конструирования и запуске макроса, создаёт чертёж для выбранного компонента:

http://my-files.ru/123v0b

В окне модели solidworks при выборе компонента в дереве конструирования и запуске макроса, открывает окно свойств выбранного компонента:

http://my-files.ru/8npqvg

Проверьте, как работают. Лично я впечатлён, спасибо за поднятый вопрос.

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

@Kir95

 

Хорошие макросы, спасибо. Единственно, макрос для создания чертежа какую-то ошибку в конце выдает, надо будет покопаться. А вообще, в идеале, мне нужно, чтобы при выделении компонента в дереве или окне сборки, появлялось окно выбора формата чертежа и далее по стандартной процедуре создания чертежа из детали.

 

Макрос со свойствами у меня использоваться вряд ли будет, т.к. пользуюсь вкладкой Свойства пользователя. Так же можно заполнять свойства деталей прямо из сборки, опять же там у меня забиты все нужные свойства и писать почти ничего не нужно, все выбирается из списков и присваивается одной кнопкой. Опять же - стандартный функционал Солида, что немаловажно.

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

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

Свойства я тоже через "Свойства пользователя" назначаю, но не все, а макросом удобно просматривать ещё и свойства документа и конфигураций.

 

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

заделитесь макросом по переименованию видов

типа такого?

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

Тут уже выкладывали - найти не могу. Shvg вроде делал.

А как же поиск?: по ключевому слову видов при поиске в данной теме много чего находит.

 

Обсуждения и варианты по теме:

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?page=94#comment-703723

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?page=79#comment-614089

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?page=79#comment-614080

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?page=69#comment-510077

 

 

 

В 19.11.2012 в 18:30, Shvg сказал:

Мои извинения. Тестил на SW2011SP5 и WinXPx64. Там никаких ошибок не выскакивало. На Win7, да, есть ошибка. Ниже выложен исправленный вариант.

Исправленный вариант макроса ReplaceLabelView и его аналог exe-шник LabelView с исходниками.

LabelView.rar

ReplaceLabelView.rar

 

http://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?do=findComment&comment=510181

 

 

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

Shvg вроде делал

Значит, этот, скорее всего:

http://http://my-files.ru/8yndpr

удаляется ссылка, что-то нарыли в архиве. LabelView, тот же, на который @Kelny ссылку выложил.

Изменено пользователем Kir95
Ссылка на сообщение
Поделиться на других сайтах
В 03.09.2017 в 15:53, streamdown сказал:

Сортировка сопряжений. А точнее, правильное переименование.

http://www.streamdivision.com/сортировка-сопряжений/

Проверка на вирусы, показала Троян :( и прочую гниль...

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

Проверка на вирусы

Отвечу как и всем предыдущим: не качать и не запускать. Всё ж логично.

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

LabelView

Это от Kelny? У Shvg название dll-ки вроде подлиньше было.

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

Это от Kelny? У Shvg название dll-ки вроде подлиньше было.

По ссылкам выше варианты от Shvg  и ещё одного товарища.

Ссылка на сообщение
Поделиться на других сайтах
В 30.08.2017 в 12:20, Michael_Mira сказал:

...

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

 

; А можно сделать перед номером конфигурации не точку, а тире? Сам не смог...

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

Макрос для установки ширины дерева конструирования - значение в скобках (420) можно поменять на более подходящее:

Option Explicit
Sub main()
    Dim swApp As SldWorks.SldWorks
    Dim swModel As SldWorks.ModelDoc2
    Dim nRetVal As Long
   
    Set swApp = CreateObject("SldWorks.Application")
    Set swModel = swApp.ActiveDoc
 
    nRetVal = swModel.SetFeatureManagerWidth(420)
   
End Sub

 

Ссылка на сообщение
Поделиться на других сайтах
  • 1 месяц спустя...

Макрос для удаления подвешенных размеров в модели:

Option Explicit
Dim swApp           As SldWorks.SldWorks
Dim swModel         As ModelDoc2
Dim boolstatus      As Boolean
Dim swAnn           As Annotation
    
Sub main()
    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc

    swModel.ClearSelection2 (True)
        Set swAnn = swModel.GetFirstAnnotation2
        Do While Not swAnn Is Nothing
            If swAnn.IsDangling Then
                boolstatus = swAnn.Select3(True, Nothing)
            End If
            Set swAnn = swAnn.GetNext3
        Loop
        boolstatus = swModel.DeleteSelection(True)

    swModel.ClearSelection2 (True)
    
End Sub

 

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

Макрос для удаления подвешенных размеров в чертеже:

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

Option Explicit
    
Sub main()
Dim swApp           As SldWorks.SldWorks
Dim swModel         As ModelDoc2
Dim swDraw          As DrawingDoc
Dim swSheet         As Sheet
Dim swView          As View
Dim boolstatus      As Boolean
Dim swAnn           As Annotation
Dim vSheetNames     As Variant
Dim i               As Integer

    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
    
    If swModel.GetType <> SwConst.swDocumentTypes_e.swDocDRAWING Then Exit Sub
    Set swDraw = swModel
    
    swModel.ClearSelection2 (True)
    vSheetNames = swDraw.GetSheetNames
    For i = 0 To UBound(vSheetNames)
        swDraw.ActivateSheet vSheetNames(i)
        Set swSheet = swDraw.Sheet(vSheetNames(i))
        Set swView = swDraw.GetFirstView
        Do While Not swView Is Nothing
            Set swAnn = swView.GetFirstAnnotation3
            Do While Not swAnn Is Nothing
                If swAnn.IsDangling Then
                    boolstatus = swAnn.Select3(True, Nothing)
                End If
                Set swAnn = swAnn.GetNext3
            Loop
            Set swView = swView.GetNextView
        Loop
        boolstatus = swModel.DeleteSelection(True)
        swModel.ClearSelection2 (True)
    Next i
    swModel.ClearSelection2 (True)
    
End Sub

 

 

Ссылка на сообщение
Поделиться на других сайтах
  • 2 недели спустя...
В 22.05.2017 в 17:18, shalenna сказал:

Подскажите пожалуйста, что не так? В настройках поставил галку - полоса заморозки, а в дереве построения полосы - желтой  под названием детали нет???

В контекстном меню появился пункт "заморозка" , но при выборе тоже никакой реакции. Solid 2017 sp2. Win 7.

Та же самая фигня. Ставишь убираешь галочку - всё одно - полосы нет. Глюк появился в 2017 солиде на моём компе. Но на других компах работает.

Ссылка на сообщение
Поделиться на других сайтах
  • 1 месяц спустя...

Здравствуйте!

Вставляем в чертеж развертку (flat pattern) листовой детали.

При простановке параметров гибов (bend notes) углы автоматически указываются с точностью до второго знака после запятой.

Как изменить точность углов в behd notes? В частности - нужно округлить до целых значений.

В файле bendnoteformat.txt этого нет, манипулирование с точностью в шаблоне чертежа тоже не помогли....

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

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

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

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

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

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

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

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

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

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

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




  • Сообщения

    • IgnatvKudrin
      Для нашего производства требуются постоянно инструментальные пружины для штампов. Сейчас заказы обрабатываются довольно долго - до 2-х месяцев. А у нас сроки на штампы 1-2 месяца с испытанием, доработкой и т.п. Хотелось бы найти поставщика, у которого уже есть склад с данными пружинами или кто может доставить за 1 месяц.   Пружины стандартные по ISO, но на всякий случай приложил каталог. Вот список пружин, которые нужны очень срочно:   LR 32 x 44 - 1 шт. LR 25 x 51 - 2 шт. LB 63 x 89 - 7 шт. LB 32 x 102 - 10 шт. LB 32 x 89 - 20 шт. LB 32 x 76 - 12 шт. LB 32 x 51 - 6 шт. LB 25 x 127 - 9 шт.   Готов выслушать все предложения. Возможно даже есть те, кто сможет изготовить подобные пружины с такими же параметрами. 20231101.pdf
    • bubblyk
      Знатоки форума, подскажите, как смоделировать простую (на первый взгляд) задачу термомеханики в упругой постановке.   Есть брусок правильный формы ака кирпич, в котором генерируется НЕРАВНОМЕРНОЕ удельное тепловыделение (HGEN). Задняя и передняя поверхности конвективно охлаждаются с известными (но различными) коэффициентами теплоотдачи и температурами жидкости/газа. Свойства кирпича (теплофизика + механика) принимаются зависящими от температуры. Постановка - стационарная Собственно вопрос : как грамотно смоделировать температурное поле в кирпиче с учетом температурного расширения?   Исходный код приложил.     Надеюсь на коллективный разум и опыт! EPTH2D.mac p.s.   Если есть опыт решения этой задачи в Ansys WB, тоже можно сюда приложить командные вставки.
    • OutXL
      Это было давно использовал NC-Link  и данную инструкцию. The Maho.docx
    • Mikhail_Podgornyj
      Добрый день, кто может поделиться SKF Bearing V1.6 (ANSYS App)? Заранее благодарен!
    • alexqwq10
      В данных корпусах ничего лишнего быть не должно. Максимум шпильки заземления, в количестве предусмотренном для конкретного корпуса. Рассматривал очень много подобных корпусов разных производителей и данная проблема актуальна для подавляющего большинства.
    • MFS
      Коллеги, приветствую, нужно штамповать на горячую из алюминиевого сплава (АК6 или около того) заготовки размером 280*180*12. Подскажите, пожалуйста, параметры пресса для такой заготовки - размеры, усилия. А есл дадите пример такой марки и модели, более менее подходящей для этой работы (нашего или импортного), то будет и еще лучше. Заранее спасибо!
    • Elbaro
      Добрый день. Уже несколько дней пытаюсь найти на просторах инета макрос, позволяющий менять материал выделенных деталей в сборке. У меня есть макрос это делающий, но только в открытой детали, заставить его работать в сборке не получается. Может кто поделится ссылкой или часть кода? Спасибо.
    • maxx2000
      @ANT0N1DZE чтобы ответить на этот вопрос надо вспомнить что экранирует СВЧ, а что для него прозрачно.
    • Александр1979
      В параметре 4018 задаётся метод позиционирования. Какой тип выбран у вас?
    • Bot
      АСКОН, российский разработчик инженерного программного обеспечения и ИТ-интегратор, подвел итоги 2023 года. Выручка компании выросла на 47% и достигла 5,6 млрд рублей, штат сотрудников увеличился до 1250 человек. Клиентская база пополнилась тысячью предприятий и сегодня с решениями АСКОН работают почти 16 000 заказчиков из всех отраслей промышленности и строительства. Смотреть полностью
×
×
  • Создать...