Вставка стандартных изделий из справочника в 3d сборку.

Автор Semargl1990, 15.10.20, 11:43:23

« предыдущая - следующая »

0 Пользователей и 1 гость просматривают эту тему.

Semargl1990

Добрый день форумчане! Поделитесь пожалуйста рабочим кодом вставки стандартного изделия из справочника в 3в сборку на Vb,VB.NET, VBA, т.е. создал документ 3d сборки и вставил СИ из справочника. Заранее спасибо! 

Semargl1990


СВ

 Не расстраивайтесь. Просто сегодня суббота - выходной.

Semargl1990

Ну, сегодня рабочий день, помогите пожалуйста. Или все на работе? :)

VLaD-Sh

Не расстраивайтесь. Просто сегодня короткий день, перед выходным.

Петрович-47

Semargl1990, на самом деле тут Вам никто не поможет, ВБ никто не занимается и знатоков тут по видимости нет... я тоже задавал вопрос - но все как в омут... тишина...

Warlock-72

Цитата: Петрович-47 от 03.11.20, 09:41:00... ВБ никто не занимается и знатоков тут по видимости нет...
Ув. Вячеслав Никонов, может быть, поможет?..

Semargl1990

Мне хотя бы протестировать этот кусок кода на VBA, на разных сборках, чтобы знать куда копать:
Private Sub CommandButton1_Click()
        Set aPLClient = New PARTLibClient.BOSimpleProvider
        Set partcommondata = aPLClient.CreateCommonDataObj
        partcommondata.SetFindOptions "3DSolid"                     
        Set partisofolder = partcommondata.FolderByID("") - Ибо на этой строке vba зависает на win 10 64 bit, excel 2013 32 bit, Kompas 2017 64 bit;
                                                            И вылетает excel на Win 8.1, excel 2013 64 bit, Kompas 2017 64bit.
                                                            А должно возвратить интерфейс папок библиотеки СИ.                                                                         
End Sub
Так что не знаю то ли код кривой, то ли сборка должно быть другим. Может кто-то сталкивался чем-то подобным?