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

Макрос для создания нового виртуального компонента


ИльдарСолид

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

ИльдарСолид

Доброго времени суток! Пишу макрос, новичок )

История такая, нужно создать новый виртуальный компонент в сборке сразу с заданным в пользовательской форме именем , 

     при вызове макроса

1. открывается пользовательская форма(где есть Поле ввода Имени файла   )  

2. ввожу имя и нажимаю на кнопку  создать ,создается компонент с заданным в текст боксе именем

Форму уже сделал ,не могу создать правильную команду 

текст программы 

 

 

Option Explicit

' ******************************************************************************
' C:\Users\oleg-PC\AppData\Local\Temp\swx13248\Macro1.swb - macro recorded on 05/19/20 by oleg-PC
' ******************************************************************************
Dim swApp As Object

Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Private Sub CommandButton1_Click()

Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
' Insert New Virtual Part
Dim swFaceOrPlane As Object
Dim swComponent As Component2
longstatus = Part.InsertNewVirtualPart(swFaceOrPlane, swComponent)

End Sub

Private Sub UserForm_Initialize()
TextBox1.Value = ""
ComboBox1.Clear
ComboBox1.AddItem "СБ"
ComboBox1.AddItem "ДТ"
End Sub
 

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


UnPinned posts
В 19.05.2020 в 10:04, ИльдарСолид сказал:

1. открывается пользовательская форма(где есть Поле ввода Имени файла   )  

2. ввожу имя и нажимаю на кнопку  создать ,создается компонент с заданным в текст боксе именем

Форму уже сделал ,не могу создать правильную команду 

1. Считываете с формы имя в переменную, например: NewName

2. Вставляете компонент:

http://help.solidworks.com/2010/english/api/sldworksapi/Insert_New_Virtual_Component_Example_VB.htm

3. Переименовываете вставленное под своё имя из переменной, вероятно как-то так:

swComponent.Name2 = NewName

 

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

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

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

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

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

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

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

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

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

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

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




  • Сообщения

    • Guhl
      Есть вот такие штуки. Если не лень, то можете на оптопарах hcpl спаять самому На плк простая программа с высокоскоростным счетчиком  Как вариант, по прерываню от нуль метки переписывать значенин счетчика в регистр     А фанук сам не умеет разве в диагностике показывать количество импульсов, которые насчитал?
    • gudstartup
      это как например у датчика уровни ttl какой плк работает с ttl уровнями а если уж проверять то нужен тестер сигналов например lir 590 но надо жгут изготавливать и разъем который на аi приводах стоит для энкодера проще всего проверить заменой датчика только вот со сроками покупки беда  хотя может шестерня виновата??
    • scrimline
      Сомневаюсь что попало что-то, скорее всего оператор который работал до меня этой рукой не пользовался да и за эмульсией не следил. Думаю скорее закоксовалось, поскольку после команды рука стояла на месте секунды 2-3 и начала опускаться с рывком. По поводу ладдера, постараюсь скинуть, но на нашем предприятии проблемы и с флешками и с общей сетью, да и ПК на рабочем месте нет. 
    • Bot
      Команда CSD пообщалась с представителями компании «КС-ПРО» и выяснила, как происходило внедрение G-Station, сколько времени занял процесс перехода на новую платформу, узнала об организации совместной работы и о функционале платформы. Основное направление компании «КС-ПРО» — оказание комплекса услуг технического заказчика, в том числе и для крупных офисных девелоперов. Внедрение G-Station в «КС-ПРО» проходило в ноябре 2022 года. G-Station — это всего лишь один из модулей комплексной платформы G-Tech Suite. Специалисты компании отмечают, что G-Station действительно стала хорошей альтернативой BIM 360. Специалисты «КС-ПРО» получили доступ к полноценной единой информационной среде с облачным хранилищем файлов и моделей, а также такими возможностями, как: Управление проектами, пользователями и подрядчиками; Создание чек-листов; Создание шаблонов чек-листов с процессами согласования; Передача документации на строительную площадку; Просмотр 3D- и 2D моделей [...] View the full article
    • Bot
      АСКОН, российский разработчик инженерного программного обеспечения и ИТ-интегратор, подвел итоги 2023 года. Выручка компании выросла на 47% и достигла 5,6 млрд рублей, штат сотрудников увеличился до 1250 человек. Клиентская база пополнилась тысячью предприятий, и сегодня с решениями АСКОН работают почти 16 000 заказчиков из всех отраслей промышленности и строительства. На динамику бизнеса положительно повлияли рост промышленного производства, сопровождающийся инвестициями в цифровизацию, крупные инфраструктурные проекты и курс страны на технологический суверенитет. Лидерские позиции компании в разработке и интеграции подтверждены профессиональными рейтингами. АСКОН, единственный из разработчиков инженерного ПО, вошел в ТОП-100 российских ИТ-компаний в рейтинге CNews; второй год подряд — в десятку крупнейших ИТ-поставщиков в сфере промышленности и строительства по данным TAdviser; впервые назван в тройке ведущих proptech-компаний как [...] View the full article
    • senat93
      @tribogatirya FORD 800 mm есть пост с кинематикой. По стойкам Siemens 808d , 828 там надо смотреть что за станок,какие оси и т.д. Если что,пиши lynxsenat@gmail.com, по цене договоримся. 
    • esergey
      это всего лишь видео - я не шарю в этом ...  
    • lem_on
      ну с дуру известно что сломать можно.
    • Viktor2004
      руку привязки так сломать легко
    • lem_on
      По моему вполне логично если станок вывалится в ошибку если рука не доехала до места. У меня так же если кулачки или деталь на пути, просто пихаеш ее до места и станок опять активен. Но нынешние пановья даже не могут написать модель станка.
×
×
  • Создать...