AnsweredAssumed Answered

Macro for changing the Annotations folder name

Question asked by Design Jjlouro on Jul 18, 2018
Latest reply on Jul 18, 2018 by Design Jjlouro

So, before I ask the question a little disclaimer: I have 0 experience in programing and have ony begun to start scratching the surface of macro building, having only built VERY basic macros off of recorded actions, I'm not familiar at all with VBA, so I would really apreciate if you could help me understand how to solve this problem.

I need help figuring out how to build a macro that renames the Annotation folder in the Feature Tree, So as to change it from "Anotações" to "Annotations".
So far, my attempt at recording a macro to do it has failed. It turned out something like this:

 

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.Extension.SelectByID2("Anotações", "DCABINET", 0, 0, 0, False, 0, Nothing, 0)

boolstatus = Part.SelectedFeatureProperties(0, 0, 0, 0, 0, 0, 0, 1, 0, "Annotations")

Part.ClearSelection2 True

End Sub

 

I've tried to google it and, so far the closest I've got to what I wanted, as far as I know, the Rename the 3 Default Planes - API thread, where I noticed OP tried to use the same approach as I did, but since I don't understand the syntax for the resolution I'm still not able to acheive the result I want.

Exploring the Solidworks API Help, doesn't yield any results either since I have no idea what to look for.

 

Could someone please explain to me how to get there or at least tell me what to look for in the Solidworks API Help document?

Outcomes