马上注册,结交更多同行朋友,交流,分享,学习。
您需要 登录 才可以下载或查看,没有帐号?注册
x
请教,在自动生成装配体工程图时,要给工程图标注几个大的尺寸(如图附件),我已经在装配体实体里面加了这几个尺寸,在工程图里手动也能生产这些尺寸,但是用宏录制这个过程后的程序却不能生成这些尺寸,不知道问题出在什么地方?
以下是录制的宏程序:
Dim swApp As Object
Dim Part As Object
Dim SelMgr As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Dim Feature As Object
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Set SelMgr = Part.SelectionManager
Dim Annotations As Variant
Annotations = Part.InsertModelAnnotations3(3, 32776, True, True, False, True)
End Sub |