Question

SolidWorks在二次开发，宏录制在装配体中添加一个零件，执行宏怎么老提示错误，请大家帮帮忙啊！

Dim swApp As Object

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

Sub main()

Set swApp = Application.SldWorks

Set Part = swApp.ActiveDoc
boolstatus = Part.AddComponent("C:\Documents and Settings\wuminghui\Desktop\525_1.SLDPRT", 0.001666847243598, 0.001666576356058, 0.001666847243598)
End Sub

Answer 1

先通过OpenDoc6函数将要打开的零件写入内存，然后再添加到装配体里就可以了。