Добрый день форумчане! Поделитесь пожалуйста рабочим кодом вставки стандартного изделия из справочника в 3в сборку на Vb,VB.NET, VBA, т.е. создал документ 3d сборки и вставил СИ из справочника. Заранее спасибо!
Неужели никто не поможет?
Не расстраивайтесь. Просто сегодня суббота - выходной.
Ну, сегодня рабочий день, помогите пожалуйста. Или все на работе? :)
Не расстраивайтесь. Просто сегодня короткий день, перед выходным.
Semargl1990, на самом деле тут Вам никто не поможет, ВБ никто не занимается и знатоков тут по видимости нет... я тоже задавал вопрос - но все как в омут... тишина...
Цитата: Петрович-47 от 03.11.20, 09:41:00... ВБ никто не занимается и знатоков тут по видимости нет...
Ув. Вячеслав Никонов, может быть, поможет?..
Мне хотя бы протестировать этот кусок кода на 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
Так что не знаю то ли код кривой, то ли сборка должно быть другим. Может кто-то сталкивался чем-то подобным?