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

Макросы для SolidWorks


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

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

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

Возможна предоплата(при наличии рейтингового аккуанта).

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


Что такое турта?

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

Приехал из отпуска. Могу поотвечать на ваопросы

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

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

Ссылка на сообщение
Поделиться на других сайтах
  • 3 года спустя...
18.08.2019 в 19:24, Алексей-Т сказал:

Что такое турта?

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

Приехал из отпуска. Могу поотвечать на ваопросы

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

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

Здравствуйте. Хотелось бы узнать получилось у вас что-то или нет? 

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

Если вы не делаете резнину в стиле рококо, то выбор Solidworks как инструмента проектирования довольно таки спорный.

Ссылка на сообщение
Поделиться на других сайтах
  • 3 месяца спустя...
27.07.2019 в 21:34, AndreyFrantsevich сказал:

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

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

Возможна предоплата(при наличии рейтингового аккуанта).

Здравствуйте нашли исполнителя? 

Я как раз занимаюсь разработкой с мебельными проектами

Ссылка на сообщение
Поделиться на других сайтах
  • 5 месяцев спустя...
28.07.2023 в 08:34, Sturmann сказал:

Здравствуйте нашли исполнителя? 

Я как раз занимаюсь разработкой с мебельными проектами

Добрый день. Ищу того, кто мне поможет в решении некоторых задач в солиде. Написал в личку.

 

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

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

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

 

Хотел бы вставить "код от детали» в некий универсальный код, чтобы он применялся ко всем  ВЫБРАННЫМ деталям в сборке.


Например, изменить текстуру выбранных граней, записать значения в Property Custom  каждой детали, изменить размер и т. д.

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

 

Помогите пожалуйста с кодом в таким виде:

Новый код (начало)
.......
Здесь мой код на деталь
........
новый код (конец)

 

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

Option Explicit
Dim swApp As SldWorks.SldWorks
 Dim swModel As SldWorks.ModelDoc2
 Dim swSelMgr As SldWorks.SelectionMgr
 Dim swComp As SldWorks.Component2
 Dim Count As Integer
 Dim i As Integer
 Dim myDim As SldWorks.Dimension
Sub main()
 

 Set swApp = Application.SldWorks
 Set swModel = swApp.ActiveDoc
 Set swSelMgr = swModel.SelectionManager

 Count = swSelMgr.GetSelectedObjectCount2(0)
 If Count = 0 Then MsgBox "No Components selected": Exit Sub

 
 For i = 1 To Count
   Set swComp = swSelMgr.GetSelectedObjectsComponent4(i, 0)

           'Code of part
            Set myDim = swModel.Parameter("D1@Extrude1") 'name dimension
           myDim.SystemValue = 25 / 1000
 

 Next

End Sub

Ссылка на сообщение
Поделиться на других сайтах
  • 2 недели спустя...
11.08.2019 в 04:58, Алексей-Т сказал:

@AndreyFrantsevich Есть конкретная задача? Хотел бы попробовать решить. dolmetscher@inbox.ru

 

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

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

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

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

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

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

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

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

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

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

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




  • Сообщения

    • Ветерок
      "увеличение оптимизации". Оптимизацию невозможно ни увеличить, ни уменьшить.
    • gudstartup
      @boomeeeer может от страны зависит
    • david1920
      нет время нет заниматься да и информации новой нет Это я на других станках делал
    • gudstartup
      @david1920 имеется ввиду платы на системах с сертификацией опций фалом oprminf старые в расчет не принимаются вы свой 18i восстановили?
    • gudstartup
      очень даже спрашивают как обязательную информацию для проверки вашей компании налоговый идентификатор должен быть указан. на myfanuc не спрашивают а вот на портале к сожалению просто так не зарегаться. 
    • david1920
      На 0I-TC mate менял плату управления приводами На 18i-TB менял для диагностики платы процессоров (один был от Spinner другой простой) процы были одинаковые Всё работает
    • brigval
      Браком 1.04В версии 1.04Добавлено: Автоуменьшение высоты шрифта многострочного наименования в ОН чертежа.Добавлено: Переименование поверхностей, баз, размеров в порядке их следования на чертеже.Добавлено: Переименование изображений по ГОСТ: сначала виды, затем разрезы, сечения, выносные элементы.Добавлено: Выравнивание неассоциативных видов.Добавлено: Ручной ввод шага и угла наклона штриховки.Добавлено: Перемещаются в макроэлемент компоненты, исключаемые из спецификации.Добавлено: Выбор количества значащих цифр в значении площади поверхности детали для вставки в ТТ.Добавлено: Возможность не авторазмещать ТТ перед конвертацией чертежа в PDF.Добавлено: Добавлены кнопки «Выделить все включенные в расчет» и Выделить все исключенные из расчета».Добавлено: Версия КОМПАС-3D Home показывается в программе со словом Home.Добавлено: Улучшен алгоритм считывания и вставки ТТ чертежа.Добавлено: При конвертации чертежа в PDF удаляется старый файл с таким же обозначением в начале имени, как обозначение в начале имени нового файла.Добавлено: Улучшено считывание номеров позиций из 3D-модели сборки.Исправлено: Иногда скрытые и потом показанные объекты чертежа отображались не серым цветом.Исправлено: Иногда после ручного заполнения графы «Масса» ОН чертежа в окне программы масса могла отображаться не правильно.Исправлено: В некоторых случаях из ОН чертежа могла не считываться литера.Исправлено: В некоторых окнах программы неправильно показывался заголовок окна программы.Исправлено: Другие замеченные мелкие ошибки и неточности кода.Скачать
    • boomeeeer
      Не помню чтобы у меня такое спрашивали при регистрации.
    • Snake 60
      @eljer0n  Откройте макрос SaveDRW.swp редактором VBA Найдите вот эти строки: Поменяйте выделенную цифру на нужную вам 3 или 4 - это количество символов которое останется от имени конфигурации. PS При сохранении в PDF тоже ругается на неправильное название чертежа, т.к. тоже обрезает название конфигурации до двух знаков, там тоже надо править при желании...
    • eljer0n
      @malvi.dp в общем порядок следующий (на каждое исполнение свой чертеж и позиция в спецификации):   Для исполнения с 2мя знаками. 1. Есть деталь с именем формата ХХ-01.01-01 (последнее -01 это исполнение) 2. В Мпроп детали назначается исполнение из конфигурации (как у вас на картинке). Отображается корректно 3. Создается чертеж по модели, исполнение в основной надписи чертежа детали отображается корректно. 4. Сохраняется через SaveDRW с корректным именем. 5. В спецификации сборки все отображается корректно.     Для исполнения с 3мя знаками. 1. Есть деталь с именем формата ХХ-01.01-011 (последнее -011 это исполнение) 2. В Мпроп детали назначается исполнение из конфигурации. Отображается корректно 3. Создается чертеж по модели, исполнение в основной надписи чертежа детали отображается корректно. 4. Сохраняется через SaveDRW с некорректным именем, а именно - с обрезанным до двух знаков исполнением (-01). 5. В спецификации сборки шифр отображается (внезапно! может какой глюк был: у солида или у меня ) корректно, как и у вас на рисунке.     Выходит, загвоздка все-таки только в сохранялке чертежа.
×
×
  • Создать...