AnsweredAssumed Answered

Macro not working Insert model items dimensions to SW drawing

Question asked by Diptiranjan Sahoo on Feb 15, 2017
Latest reply on Feb 18, 2017 by Filipe Venceslau

I have recorded a macro which is to place model items dimensions to SW drawing. But it is not working in models. Request all to help.

 

"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

Dim vAnnotations As Variant

vAnnotations = Part.InsertModelAnnotations3(0, 229384, True, False, False, False)

End Sub"

Outcomes