作者: ietak-008 时间: 2022-7-5 00:36
这个没试过哦作者: liupuwei 时间: 2022-7-5 01:25
vba 应该可以解决,列一个表,依次读取指定的值,获得从动值写入表作者: 286188498 时间: 2022-7-5 02:08
Dim swApp As SldWorks.SldWorks
Dim Part As ModelDoc2
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Dim myDimension As Object
Set myDimension = Part.Parameter("D1@距离1") '(配合的尺寸)
Dim myDimension1 As Object
Set myDimension1 = Part.Parameter("TXD1@模式2") '(从动的尺寸)
For i = 1 To 20
myDimension.SystemValue = i '尺寸列表
Part.EditRebuild3