Автор | Сообщение |
filat
|
| |
Пост N: 257
Зарегистрирован: 01.10.07
|
|
Отправлено: 14.07.09 07:22. Заголовок: VBA проекты в ХР64
Столкнулся с таким осложнением: на ХР64 до установка Таипа в АИ стояли сторонние макросы, а после изменения ссылки VBA проекта они соответственно перестали работать, а если вернуть старую ссылку - то уже не работает Таип. Подскажите, как их объединить?
|
|
Профиль
Ответить
|
Ответов - 3
[только новые]
|
|
brigval
|
| Брагин Игорь
|
Пост N: 1212
Зарегистрирован: 07.07.07
|
|
Отправлено: 14.07.09 08:56. Заголовок: filat пишет: Подска..
filat пишет: цитата: | Подскажите, как их объединить? |
| Запуск макросов из разных файлов к самому Таипу отношения не имеет. Пока не знаю, как запускать макросы из разных файлов. Если решите этот вопрос, то решите и свой. Спросите у Виктора Рулкенко, может он подскажет.
|
|
Профиль
Ответить
|
filat
|
| |
Пост N: 278
Зарегистрирован: 01.10.07
|
|
Отправлено: 16.09.09 09:28. Заголовок: Появилась одна мысль..
Появилась одна мысль, правда она может немного сложновата в реализации... : я понимаю, что спрашивать Ваш пароль входа - это Абсурд! а если создать в папке Таип файл (напрример) User macros.txt , а в Таип добавить блок кода (или сделать отдельным приложением) который бы добавлял макросы из этого файла в зашифрованный VBA-файл и отслеживал изменения - в итоге и Ваша собственость защищена и пользователь работает с комфортом. :)
|
|
Профиль
Ответить
|
filat
|
| |
Пост N: 319
Зарегистрирован: 01.10.07
|
|
Отправлено: 13.05.10 08:25. Заголовок: На сайте cad.ru я по..
На сайте cad.ru я поднимал вопрос о параллельной работе нескольких VBA-файлов и получил ответ: Алексей Романов пишет: цитата: | 2. Если очень нужна кнопка, то головном проекте сооружаем макрос для нее, он загрузит нужный проект и запустит макрос в нем. Допустим в файле Inventor2010.ivb проект обозван Project2010, в нем есть модуль Module1, в котором есть макрос SampleMacro... Public Sub myMakro() On Error Resume Next Dim invVBAProject As InventorVBAProject For Each invVBAProject In ThisApplication.VBAProjects If invVBAProject.Name = "Project2010" Then Exit For Next If invVBAProject Is Nothing Then ThisApplication.VBAProjects.Open "E:\Инвентор addin\2010sample\Inventor2010.ivb" For Each invVBAProject In ThisApplication.VBAProjects If invVBAProject.Name = "Project2010" Then Exit For Next End If Dim invModule As InventorVBAComponent Set invModule = invVBAProject.InventorVBAComponents.Item("Module1") Dim invSub As InventorVBAMember Set invSub = invModule.InventorVBAMembers.Item("SampleMacro") invSub.Execute End Sub |
| brigval, пожалуйста, помогите по этой модели сделать макросы для кнопок Таип. Путь к файлу и название проекта понятны (C:\Program Files\ВерЗак\Таип 2.27\PAMKA.ivb и PAMKA), а какие еще изменения нужно внести? В частности как какие названия кнопок?
|
|
Профиль
Ответить
|
|