Поиск по сайту: Результаты поиска по тегам 'VBA'.

  • Поиск по тегам

    Введите теги через запятую.
  • Поиск по автору

Тип публикаций


Категории и разделы

  • САПР, Информационные технологии в проектировании и производстве
    • Все вопросы о CAD
    • Все вопросы о CAM
    • Обсуждение CAD/CAM-систем
    • Все вопросы о CAE
    • Все вопросы о PDM
    • Дизайн, ПО для дизайна
    • САПР ТП
    • САПР зданий и сооружений, дизайн зданий
    • Электротехнические САПР
    • Сравнение и Выбор!
    • 3D Модели
    • Трансляция, конвертация, просмотр
    • Ролики по САПР
    • Настройка и выбор ПК под САПР, комплектующие к ПК
    • Программное обеспечение
  • Проектирование и производство
    • Проектирование и конструирование
    • Материалы и покрытия, прокат и профиль
    • Производственные проблемы
    • Оборудование, комплектующие, оснастка, инструмент
    • Прототипирование
    • Вопросы экономики
    • Размещение заказов
    • CNCZONE.RU
  • Полезная информация
    • Новости
    • Статьи
    • Обсудим увиденное или прочитанное
    • Раздел ссылок
    • Литература, Электронные книги, ГОСТы
  • Доска объявлений
    • Размещение заказов
    • Предложение услуг
    • Продажа
    • Покупка
    • Обмен, дарение
    • Размещение вакансий
    • Размещение резюме
  • Разное
    • Флейм
    • Юмор о CAD/CAM и не только
    • Kонкурсы проектов
  • Сервис

Календари

  • Основной календарь



Фильтр по количеству...

Найдено 7 результатов

  1. Добрый день! Нужна помощь в подключении к хранилищу SolidWorks PDM средствами Visual Basic. Какие библиотеки подключать, как авторизоваться в хранилище и т.д.? Цель - создать макрос для Excel, который будет искать файл в хранилище и формировать гиперссылку на этот файл. Заранее благодарен за помощь!
  2. Доброго времени суток, коллеги! Уже несколько недель пытаюсь решить проблему работы макросов в Solidworks на моем компьютере. Всё это время пытался найти решение проблемы в интернете, и так ничего не получилось. Загвоздка заключается в том, что после установки САПР и настройки всех нужных мне панелей я попытался подключить макросы SWPlus. Но, возникла заминка: после нажатия кнопки "открытия для редактирование макроса" или же "запуска уже записанного макроса" (с напели настроенной мною панели или панели "Макрос") ничего не происходит! Совершенно! Никакой реакции ни от SW2012 SP5.0, ни от VBA. Я подумал, что проблема с VBA и установил множество различный пакетов Microsoft Visual C++ (от 2005 до 2015), Microsoft .NET Framework (от 4.5 до 4.6.1) и т.п. Возможно, большинство из этого мне даже и не нужно, но я пытался решить проблему. После чего, установил SW2013 SP4.0, но там при каком либо действии с макросами программа начала виснуть и выключаться. Так же был установлен SW2016, но мне не нравиться его функционал, да и макросы там уже SWplus.NET - отсутствуют некоторые нужные мне. Зато SW2016 запускает редактор VBA безо всяких проблем. Уточнение: SW2012 SP5.0 и SW2012 SP4.0 обе Multilanguage Intagrated SSQ; ОС Windows 8.1 x64. На работе пользуюсь SW2012 SP4.0 с WIn7 x64 и всё нормально работает. Если есть у кого конкретные предложения решения проблемы, а не возмущения типа "поставь себе последнюю версию" или "работай без макросов" , то милости прошу
  3. Добрый день. У меня есть некий макрос на VBA для Кати. Он считывает файл с входными данными, считает координаты точек, записывает их в другой файл и потом рисует их в Part. У меня (версия Кати R2014) работает все нормально. У соседа (версия R21) тоже. А вот у коллег в другом городе - не работает последний шаг (рисование точек). Версия у коллег R21. В чем может быть загвоздка? И Почему не работает Ctrl-V ? Я не могу вставить код.
  4. Добрый день, помогите пожалуйста разобрать и сделать макрос. Макрос и профиль в 2д ниже. Макрос был скачан и изменен. 1 ошибка я так понимаю в Private Sub UserForm_Activate() - он не должен повторяться 2 курьез это в Part.ClearSelection2 True Part.DeleteAllRelations Т.е. каждый раз он удаляет все значения всех переменных, возможно ли обойти это как то при помощи Part.Recordset... или как то иначе 3. стоит ли задавать саму переменную к примеру Dim D As String? Сам макрос: Dim swApp As Object Dim Part As Object Dim boolstatus As Boolean Dim longstatus As Long, longwarnings As Long Private Sub ComboBox1_Change() End Sub Private Sub ComboBox2_Change() End Sub Private Sub ComboBox3_Change() End Sub Private Sub CommandButton1_Click() Set swApp = Application.SldWorks Set Part = swApp.ActiveDoc Part.ClearSelection2 True Part.DeleteAllRelations Part.AddRelation """D""= " & ComboBox1.Value End Sub Private Sub CommandButton2_Click() Set swApp = Application.SldWorks Set Part = swApp.ActiveDoc Part.ClearSelection2 True Part.DeleteAllRelations Part.AddRelation """A""= " & ComboBox2.Value End Sub Private Sub CommandButton3_Click() Set swApp = Application.SldWorks Set Part = swApp.ActiveDoc Part.ClearSelection2 True Part.DeleteAllRelations Part.AddRelation """B""= " & ComboBox3.Value End Sub Private Sub Label1_Click() End Sub Private Sub Label2_Click() End Sub Private Sub Label3_Click() End Sub '1=D Private Sub UserForm_Initialize() Me!ComboBox1.AddItem 253.2 Me!ComboBox1.AddItem 304 Me!ComboBox1.AddItem 329.4 End Sub '2=A Private Sub UserForm_Activate() Me!ComboBox2.AddItem 76 Me!ComboBox2.AddItem 89 Me!ComboBox2.AddItem 101.5 Me!ComboBox2.AddItem 114.5 Me!ComboBox2.AddItem 127 End Sub '3= B Private Sub UserForm_Activate() Me!ComboBox3.AddItem 10 Me!ComboBox3.AddItem 11 Me!ComboBox3.AddItem 12 End Sub Заранее спасибо! macric.rar
  5. Всем привет! Кто-нибудь знает, есть ли возможность получить доступ к Frame and Title Block чертежа средствами VBA? В дереве объектов (см. рисунок), относящихся к DrawingDocument, нет даже намека на это (просмотрел функционал всех возможных классов - безрезультатно). http://i10.pixs.ru/storage/9/8/8/dwgobjects_4185709_20422988.jpg Спасибо.
  6. Доброго времени суток форумчане! написал макрос в созданном текстовом файле, поменял расширение на .bas при попытке импортировать сообщает ошибку скрин 1. дело не в макросе и не в кодировке файла (windows-1251) т.к. при экспорте макроса после редактирования все работает.
  7. Задача следующая, в экселевской таблице есть список названий деталей/сборок, необходимо получить их массы. Написал следующий макрос, код которого, практически полностью взят из примера, приведенного в справке: Sub Массы() Application.ScreenUpdating = False Dim swApp As SldWorks.SldWorks Dim vMassProp As Variant Dim sConfig As Variant Dim FilePathName As String Dim ConfigurationName As String Set swApp = CreateObject("SldWorks.Application") On Error Resume Next For i = 1 To Range("Таблица_данных").Rows.Count vMassProp = Nothing FilePathName = ... указывается ячейка содержащая путь ConfigurationName = ... указывается ячейка содержащая имя конфигурации vMassProp = swApp.GetMassProperties2(FilePathName, ConfigurationName, 1) Cells(i + 1, 2) = Application.RoundUp(vMassProp(5), 1) Next i Application.ScreenUpdating = True End Sub И вроде бы все должно быть ОК, но почему-то массы возвращаются не на все детали/сборки, а как-то выборочно. В справке написано, что для того чтобы получить массу, необходимо, чтобы при сохранении модели были рассчитаны массовые характеристики. И дается команда (SetUserPreferenceToggle swUpdateMassPropsDuringSave, True/False) для установки расчета массовых характеристик автоматически при сохранении файла. Эта команда, как я понял, является аналогом последовательности действий в солидворксе "Параметры -> Качество изображения -> Обновить массовые характеристики при сохранении документа". Так вот галочка у меня в этой настройке стоит и командой "SetUserPreferenceToggle swUpdateMassPropsDuringSave, True" я ее тоже включал, но тем не менее результата нет. При открытой сборке, количество деталей на которые значение массы все-таки будет получено увеличивается (но тем не менее не до 100%), но мне надо, чтобы массы возвращались из закрытых файлов.